1 Brief explanation

Every boxplot means a monitoring point (Ponto de monitoramento (or PM) in portuguese). My goal here is to analyze the evolution between decades of each water quality parameter that compounds the Water Quality Index (WQI).

The river flows in the east-west direction as shown in the image below.

The logic behind the sorting in the boxplots is because of 2 main reasons:

  1. The original monitoring point isn’t easy to understand (8 digits, like 87409900)
  2. Changing the original nomenclature to PM1, PM2 (…) makes it easier to understand that the last point has water contributions of every other point upstream.

Some features that I want to add: - If the parameter is x, then use x’s classes (with its own classes background color plotted) - Define the timescale, should act just like a filter

# plan_wide_19902020 %>%
#   filter(ANO_COLETA > "1990" &
#          ANO_COLETA <= "2000")

2 Anotações de coisas por fazer:

  • Descobrir como colocar as estações no sentido correto montante -> jusante nos sumários

87398500, 87398980, 87398900, 87398950, 87405500, 87406900, 87409900

  • Aprender a segmentar o meu dataset por períodos
  • aprender a criar uma nova coluna com a segmentação dos períodos
  • maybe use ~facet.grid
  • aprender a colocar a legenda dentro do gráfico
    • reduzir o tamanho da legenda
  • corrigir os valores 0 de IQA pra NA
  • descobrir como conseguir a equação do lm
  • aprender a pivotar o sumário -> meu sumário do google docs ta batendo direitinho com o do R
  • descobrir se há outros TCCs com disponibilização de códigos
  • Namon tá com com casa decimal "," e ptot tá com "."
  • correlação forte entre condutividade e Namon/Ptot/DBO
1990-2000 2000-2010 2010-2020
1990-2000 2000-2010 2010-2020

3 Instalar os pacotes

# install.packages(tidyverse)

3.1 acessar os pacotes

# library(ggpubr)
pacman::p_load(readr, rmarkdown, readxl, janitor,
               pillar, dplyr, tidyverse,
               # gapminder, 
               knitr, kableExtra, see,
               gridExtra, #modelsummary, 
               gtsummary, ggplot2,
               ggbeeswarm, GGally, ggtext, cowplot,
               report)
# pacman::p_load(tibbletime)
# cite_packages()
knitr::knit_hooks$set(time_it = local({
   now <- NULL
   function(before, options) {
      if (before) {
         # record the current time before each chunk
         now <<- Sys.time()
      } else {
         # calculate the time difference after a chunk
         res <- difftime(Sys.time(), now)
         # return a character string to show the time
         paste("Time for this code chunk to run:", res)
      }
   }
}))

knitr::opts_chunk$set(time_it = TRUE)

3.1.1 referenciando os pacotes

# version$version.string
# citation(package = "tidyverse")

Time for this code chunk to run: 0.00306510925292969

3.2 importando a planilha

## Rows: 1,179
## Columns: 53
## $ CODIGO              <chr> "87398950", "87398900", "87405500", "87398950", "8…
## $ MUNICIPIO           <chr> "GRAVATAI - RS", "GRAVATAI - RS", "CACHOEIRINHA - …
## $ ENDERECO            <chr> "A PE NO TREVO, NA PONTE VELHA OU DE BARCO VINDO D…
## $ COORD_GEO_LAT_GRAU  <dbl> -51.00064, -50.93414, -51.11733, -51.00064, -50.93…
## $ COORD_GEO_LONG_GRAU <dbl> -29.95055, -29.95075, -29.95055, -29.95055, -29.95…
## $ Altitude            <dbl> 7, 6, 6, 7, 6, 7, 9, 9, 6, 6, 6, 6, 7, 6, 7, 6, 13…
## $ RECURSO_HIDRICO     <chr> "RIO GRAVATAI", "RIO GRAVATAI", "RIO GRAVATAI", "R…
## $ DATA_COLETA         <date> 1994-12-08, 1994-02-03, 1994-02-03, 1993-10-06, 1…
## $ ANO_COLETA          <dbl> 1994, 1994, 1994, 1993, 1994, 1995, 1994, 1995, 19…
## $ Alcalinidade        <dbl> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA…
## $ Condutividade       <dbl> 90.0, 47.0, 147.0, 43.0, NA, 47.0, 70.0, 60.6, 72.…
## $ DBO                 <dbl> 5, 5, 11, 3, 3, 2, 4, 3, 4, 2, 5, 3, 1, 1, 5, 2, 2…
## $ IQA_DBO             <dbl> 53.97, 53.97, 29.03, 69.06, 69.06, 78.12, 61.05, 6…
## $ DQO                 <dbl> 26, 47, 34, 37, 54, 23, 35, 25, 28, 40, 21, 35, 21…
## $ E_coli              <dbl> 4.0, 40.0, 12.8, 10.4, 32.0, 16.8, 40.0, 6.4, 10.4…
## $ fosfato_orto        <dbl> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA…
## $ fosforo_total       <dbl> 0.1130, 0.0883, 0.3530, 0.0908, 0.1180, 0.0326, 0.…
## $ IQA_Ptot            <dbl> 72.73, 77.95, 38.26, 77.41, 71.71, 91.16, 63.37, 6…
## $ Nitrato             <dbl> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA…
## $ Nitrito             <dbl> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA…
## $ nitro_organico      <dbl> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA…
## $ nitro_amon          <dbl> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA…
## $ nitro_kjeldahl      <dbl> 1.42, 1.61, 6.62, 0.79, 1.45, 0.76, 1.23, 1.37, 2.…
## $ nitro_total         <dbl> 1.42, 1.61, 6.62, 0.79, 1.45, 0.76, 1.23, 1.37, 2.…
## $ IQA_NitroTot        <dbl> 89.02, 87.64, 59.33, 93.74, 88.80, 93.97, 90.41, 8…
## $ oxigenio_dissolvido <dbl> 6.5, 8.7, 5.3, 7.8, 7.6, 8.5, 7.3, 6.9, 6.7, 6.3, …
## $ sat_OD              <dbl> 78.162, 116.280, 70.837, 85.270, 96.442, 85.565, 7…
## $ IQA_OD              <dbl> 84.58, 90.92, 76.25, 89.67, 97.53, 89.88, 79.57, 7…
## $ pH                  <dbl> 6.9, 6.8, 6.6, 6.4, 6.9, 6.7, 6.6, 6.7, 6.3, 7.1, …
## $ IQA_pH              <dbl> 89.76, 87.72, 82.86, 76.96, 89.76, 85.42, 82.86, 8…
## $ SDT                 <dbl> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA…
## $ SST                 <dbl> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA…
## $ temp_agua           <dbl> 25.0, 31.0, 31.0, 20.0, 28.0, 16.0, 16.0, 16.0, 18…
## $ temp_ar             <dbl> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA…
## $ transparencia_agua  <dbl> NA, 40.0, 30.0, NA, NA, NA, 50.0, 20.0, 40.0, 20.0…
## $ turbidez            <dbl> 20.0, 20.0, 8.5, 23.0, 19.0, 17.0, 12.0, 22.0, 17.…
## $ IQA_Turb            <dbl> 61.87, 61.87, 80.20, 58.73, 63.07, 65.69, 73.57, 5…
## $ vazao_rio           <dbl> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA…
## $ Vazao               <dbl> NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA, NA…
## $ coliformes_termo    <dbl> 5, 50, 16, 13, 40, 21, 50, 8, 13, 23, 700, 16, 8, …
## $ IQA_coli            <dbl> 76.58, 47.21, 60.44, 63.04, 49.66, 57.12, 47.21, 6…
## $ solidos_totais      <dbl> 121, 112, 160, 93, 127, 75, 80, 201, 84, 123, 78, …
## $ IQA_Sól_Tot         <dbl> 83.91, 84.69, 79.40, 85.78, 83.28, 86.08, 86.07, 7…
## $ `IQA_^OD`           <dbl> 2.126, 2.153, 2.089, 2.148, 2.178, 2.148, 2.104, 2…
## $ `IQA_^temp_agua`    <dbl> 1.58, 1.58, 1.58, 1.58, 1.58, 1.58, 1.58, 1.58, 1.…
## $ `IQA_^coli`         <dbl> 1.917, 1.783, 1.850, 1.862, 1.796, 1.835, 1.783, 1…
## $ `IQA_^pH`           <dbl> 1.715, 1.711, 1.699, 1.684, 1.715, 1.705, 1.699, 1…
## $ `IQA_^DBO`          <dbl> 1.175, 1.175, 1.271, 1.116, 1.116, 1.072, 1.149, 1…
## $ `IQA_^NitroTot`     <dbl> 1.567, 1.564, 1.504, 1.575, 1.566, 1.575, 1.569, 1…
## $ `IQA_^Ptot`         <dbl> 1.535, 1.546, 1.440, 1.545, 1.533, 1.570, 1.514, 1…
## $ `IQA_^Turb`         <dbl> 1.391, 1.391, 1.420, 1.385, 1.393, 1.398, 1.410, 1…
## $ `IQA_^Sól_Tot`      <dbl> 1.425, 1.426, 1.419, 1.428, 1.424, 1.428, 1.428, 1…
## $ IQA                 <dbl> 61.876, 58.452, 57.556, 57.129, 56.405, 56.189, 55…

Time for this code chunk to run: 0.613819122314453

Time for this code chunk to run: 0.381842136383057

4 data wrangling

Como há dados faltantes, no cálculo entre o produto das colunas, o R acaba interpretando como se fosse zero, mas na verdade é NA.

plan_wide_19902020 <- plan_wide_19902020 %>% 
   mutate(IQA = ifelse(IQA == 0, NA, IQA))

parametros_IQA <- plan_wide_19902020 %>%
  select(CODIGO,
         pH,
         DBO,
         E_coli,
         nitro_amon,
         nitro_kjeldahl,
         nitro_total,
         fosforo_total,
         temp_agua,
         turbidez,
         solidos_totais,
         oxigenio_dissolvido,
         Condutividade,
         ANO_COLETA)

write.csv(parametros_IQA,
          "./parametros_IQA.csv",
          row.names = FALSE)

plan_wide_19902020 %>% 
  select(starts_with("IQA_^")) %>% 
  mutate(
    TESTANDOIQA = prod()
  )
## # A tibble: 1,179 × 10
##    `IQA_^OD` IQA_^temp…¹ IQA_^…² IQA_^…³ IQA_^…⁴ IQA_^…⁵ IQA_^…⁶ IQA_^…⁷ IQA_^…⁸
##        <dbl>       <dbl>   <dbl>   <dbl>   <dbl>   <dbl>   <dbl>   <dbl>   <dbl>
##  1      2.13        1.58    1.92    1.72    1.18    1.57    1.54    1.39    1.42
##  2      2.15        1.58    1.78    1.71    1.18    1.56    1.55    1.39    1.43
##  3      2.09        1.58    1.85    1.70    1.27    1.50    1.44    1.42    1.42
##  4      2.15        1.58    1.86    1.68    1.12    1.58    1.54    1.38    1.43
##  5      2.18        1.58    1.80    1.72    1.12    1.57    1.53    1.39    1.42
##  6      2.15        1.58    1.84    1.70    1.07    1.58    1.57    1.40    1.43
##  7      2.10        1.58    1.78    1.70    1.15    1.57    1.51    1.41    1.43
##  8      2.08        1.58    1.89    1.70    1.12    1.57    1.52    1.39    1.41
##  9      2.09        1.58    1.86    1.68    1.15    1.56    1.49    1.40    1.43
## 10      2.13        1.58    1.83    1.72    1.07    1.57    1.55    1.38    1.42
## # … with 1,169 more rows, 1 more variable: TESTANDOIQA <dbl>, and abbreviated
## #   variable names ¹​`IQA_^temp_agua`, ²​`IQA_^coli`, ³​`IQA_^pH`, ⁴​`IQA_^DBO`,
## #   ⁵​`IQA_^NitroTot`, ⁶​`IQA_^Ptot`, ⁷​`IQA_^Turb`, ⁸​`IQA_^Sól_Tot`
# library(performance)
# modelo <- plan_wide_19902020 %>% 
#   select(CODIGO, oxigenio_dissolvido, periodo) %>% 
#   group_by(CODIGO, periodo) %>% 
#   lm() %>% 
#   performance::check_distribution()
# # lm()
# 
# check_model(modelo)
# performance::check_autocorrelation(modelo)

Time for this code chunk to run: 0.269666910171509

Time for this code chunk to run: 0.00218701362609863

Time for this code chunk to run: 0.00304198265075684

5 setting theme

theme_grafs <- function(bg = "white", 
                        coloracao_letra = "black") {
  theme(
    plot.title = 
      element_text(
        hjust = 0.5,
        color = coloracao_letra,
        size = 19),
    
    axis.title.x = 
      # element_text(
      # color = coloracao_letra,
      # size = 15,
      # angle = 0,),
      element_blank(),
    axis.title.y = element_text(
      color = coloracao_letra,
      size = 15,
      angle = 90),
    
    axis.text.x = element_text(
      color = coloracao_letra,
      size = 17),
    axis.text.y = element_text(
      color = coloracao_letra,
      size = 17,
      angle = 0),
    
    strip.background = element_rect(fill = bg,
                                    linetype = 1,
                                    size = 0.5,
                                    color = "black"),
    strip.text = element_text(size = 17),
    panel.background = element_rect(fill = bg),
    plot.background = element_rect(fill = bg),
    plot.margin = margin(l = 5, r = 10,
                         b = 5, t = 5)
  )
}

Time for this code chunk to run: 0.00351190567016602

6 setting different timescales

Time for this code chunk to run: 0.00654387474060059

7 setting sumaries

Time for this code chunk to run: 0.00725698471069336

8 criando função para gerar boxplots com percentil 20 e 80

f <- function(x) {
  r <- quantile(x, probs = c(0.05, 0.20, 0.50, 0.80, 0.95))
  names(r) <- c("ymin", "lower", "middle", "upper", "ymax")
  return(r)
}

Time for this code chunk to run: 0.00352811813354492

9 Parâmetros físico-químicos

9.0.1 Oxigênio Dissolvido

Oxigênio Dissolvido no período 1990-2020Time for this code chunk to run: 1.26934480667114

Oxigênio Dissolvido no período 1990-2000Time for this code chunk to run: 2.02952980995178

Time for this code chunk to run: 0.843261957168579

Time for this code chunk to run: 0.706562042236328

grid.arrange(od_p1, od_p2, od_p3, ncol = 3)

Oxigênio Dissolvido no período 1990-2020Time for this code chunk to run: 2.08029103279114

# ggsave("od.png",
#        units = c("px"),
#        width = 4500,
#        height = 2993,
#        plot = od,
#        path = "./graficos",
#        dpi = 300,
#        type = "cairo")

ggsave("od_p1.png",
       plot = od_p1,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("od_p2.png",
       plot = od_p2,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("od_p3.png",
       plot = od_p3,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("od_3periodos.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = grid.arrange(od_p1, od_p2, od_p3, ncol = 3),
       path = "./graficos",
       dpi = 300,
       type = "cairo")

Time for this code chunk to run: 6.05964016914368

Time for this code chunk to run: 0.00866484642028809

Time for this code chunk to run: 0.690712928771973

Time for this code chunk to run: 0.847044944763184

Time for this code chunk to run: 1.04315996170044

grid.arrange(iqaod_p1, iqaod_p2, iqaod_p3, ncol = 3)

Time for this code chunk to run: 2.40081405639648

## # A tibble: 7 × 8
##   par       PM1    PM2   PM3   PM4   PM5   PM6   PM7
##   <chr>   <dbl>  <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 max     10.8   10.5  10.3  12.1  19.9  10.2  11.1 
## 2 q3       7.3    8     7.1   8.2   6     5     5.65
## 3 median   6.4    6.9   5.95  6.3   4.2   2.6   2.9 
## 4 mean     5.99   6.78  5.98  7.01  4.22  2.98  3.60
## 5 q1       4.9    5.6   4.4   6     1.9   0.25  1.4 
## 6 min      0.8    2     2.5   4.2   0.1   0.1   0.1 
## 7 n      101    101    68    30    97    32    65
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500   0.4   3.5   4.9   5.01  6.65  10.9
## 2 87398900   1.9   4     5.5   5.33  6.6   12  
## 3 87398950   1.7   3.2   5.3   5.06  6.18   8.9
## 4 87398980   1.2   3.8   5.6   5.38  6.6    9.2
## 5 87405500   0.2   1.4   2.55  3.28  4     14.2
## 6 87406900   0     1.1   1.9   2.59  3.15  16  
## 7 87409900   0     0.7   2.3   3.12  3.7   10.6
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500  0.38 3.11    4.41  4.57  6.2   12.4
## 2 87398900  3.52 5.25    5.96  6.61  7.3   13.8
## 3 87398950  1.62 3.68    4.92  5.28  6.64  11.9
## 4 87398980  3.37 5.5     6.17  6.48  7.14  13.1
## 5 87405500  0.2  1.3     2.53  2.83  3.66   9.8
## 6 87406900  0.1  0.865   2.4   2.43  3.05   9.1
## 7 87409900  0.1  0.92    2.03  2.43  3.5    8.1

Time for this code chunk to run: 0.406455039978027

9.0.2 Demanda Bioquímica de Oxigênio

(dbo <- ggplot(plan_wide_19902020,
               aes(x = CODIGO,
                   y = DBO))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=10,
            ymax=Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=5,
            ymax=10,
            alpha=1,
            fill="#fcf7ab")+ #classe 3
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=3,
            ymax=5,
            alpha=1,
            fill="#70c18c")+ #classe 2
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=0,
            ymax=3,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   facet_wrap(~periodo)+
   labs(title = "Demanda Bioquímica de Oxigênio no período 1990-2020",
        x="Estação",
        y="mg/L")+
   ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   scale_y_continuous(expand = expansion(mult = c(0.03,0.03)),
                      n.breaks = 8,
                      limits = c(1,100),
                      trans = "log10")+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)
## Warning: Transformation introduced infinite values in continuous y-axis
## Warning: Removed 60 rows containing non-finite values (`stat_boxplot()`).
## Removed 60 rows containing non-finite values (`stat_boxplot()`).
## `geom_smooth()` using formula = 'y ~ x'
## Warning: Removed 22 rows containing missing values.
## Warning: Removed 30 rows containing missing values.
## Warning: Removed 8 rows containing missing values.

Demanda Bioquímica de Oxigênio no período 1990-2020Time for this code chunk to run: 2.04859709739685

Time for this code chunk to run: 1.10499286651611

Time for this code chunk to run: 1.10075092315674

Time for this code chunk to run: 1.00755405426025

Time for this code chunk to run: 1.23249101638794

Time for this code chunk to run: 0.880059957504272

Time for this code chunk to run: 0.773524045944214

grid.arrange(dbo_p1, dbo_p2, dbo_p3, ncol = 3)

Time for this code chunk to run: 2.46709489822388

(sum_dbo_p1 <- plan_wide_19902020 %>%
   select(CODIGO, DBO, ANO_COLETA) %>% 
   filter(ANO_COLETA>"1990" &
            ANO_COLETA<="2000") %>% 
   group_by(CODIGO) %>% 
   summarize(
     min = 
       min(DBO, 
           na.rm = TRUE),
     q1 = 
       quantile(DBO, 0.25, 
                na.rm = TRUE),
     median = 
       median(DBO, 
              na.rm = TRUE),
     mean = 
       mean(DBO, 
            na.rm= TRUE),
     q3 = 
       quantile(DBO, 0.75, 
                na.rm = TRUE),
     max = 
       max(DBO, 
           na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500     1     1      2  1.86   2      13
## 2 87398900     1     1      1  1.52   2       6
## 3 87398950     1     1      1  1.66   2       6
## 4 87398980     1     1      1  1.13   1       2
## 5 87405500     1     2      3  5.37   5      64
## 6 87406900     1     4      5  9     11      26
## 7 87409900     2     3      4  6.97   9.5    31
(sum_dbo_p2 <- plan_wide_19902020 %>%
    select(CODIGO, DBO, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2000" &
             ANO_COLETA<="2010") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(DBO, 
            na.rm = TRUE),
      q1 = 
        quantile(DBO, 0.25, 
                 na.rm = TRUE),
      median = 
        median(DBO, 
               na.rm = TRUE),
      mean = 
        mean(DBO, 
             na.rm= TRUE),
      q3 = 
        quantile(DBO, 0.75, 
                 na.rm = TRUE),
      max = 
        max(DBO, 
            na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500     1     1      1  1.58   2       5
## 2 87398900     1     1      1  1.40   2       5
## 3 87398950     1     1      1  1.66   2       5
## 4 87398980     1     1      1  1.30   1       5
## 5 87405500     1     2      4  4.67   6.5    14
## 6 87406900     1     3      5  6.53   8      28
## 7 87409900     1     3      6  6.31   9      15
(sum_dbo_p3 <- plan_wide_19902020 %>%
    select(CODIGO, DBO, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2010" &
             ANO_COLETA<="2020") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(DBO, 
            na.rm = TRUE),
      q1 = 
        quantile(DBO, 0.25, 
                 na.rm = TRUE),
      median = 
        median(DBO, 
               na.rm = TRUE),
      mean = 
        mean(DBO, 
             na.rm= TRUE),
      q3 = 
        quantile(DBO, 0.75, 
                 na.rm = TRUE),
      max = 
        max(DBO, 
            na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500     1     1    1.5  2.15  3        7
## 2 87398900     1     1    1    1.51  2        5
## 3 87398950     1     1    2    2.65  2       18
## 4 87398980     1     1    1    1.32  2        2
## 5 87405500     1     3    4    5.28  6.25    21
## 6 87406900     1     3    5    6.58 10       24
## 7 87409900     1     3    4.5  6.18  8       18

Time for this code chunk to run: 0.265676021575928

ggsave("dbo.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = dbo,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("dbo_p1.png",
       plot = dbo_p1,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("dbo_p2.png",
       plot = dbo_p2,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("dbo_p3.png",
       plot = dbo_p3,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("dbo_3periodos.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = grid.arrange(dbo_p1, dbo_p2, dbo_p3, ncol = 3),
       path = "./graficos",
       dpi = 300,
       type = "cairo")

Time for this code chunk to run: 8.27701210975647

9.0.3 Fósforo total

(ptot <- ggplot(plan_wide_19902020,
                aes(CODIGO,
                    fosforo_total))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=0.15,
            ymax=Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=0.1,
            ymax=0.15,
            alpha=1,
            fill="#fcf7ab")+ #classe 3
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=0,
            ymax=0.1,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                 width=0.3,
                 position = position_dodge(width = 0.65))+
    geom_boxplot(fill='#F8F8FF',
                 color="black",
                 outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                 width= 0.7)+
  facet_wrap(~periodo)+
    labs(title = "Fósforo total no período 1990-2020",
         x="Estação",
         y="mg/L")+
   scale_y_continuous(expand = expansion(mult = c(0.03,0.03)),
                      n.breaks = 8,
                      limits = c(min(plan_wide_19902020$fosforo_total, na.rm = TRUE),
                                 max(plan_wide_19902020$fosforo_total), na.rm = TRUE),
                      trans = "log10",
                      labels = scales::number_format(accuracy = .001,
                                                     decimal.mark = ",",
                                                     big.mark = " ")
                      )+
    ggbeeswarm::geom_quasirandom(
       size = 1.2,
       alpha = .25,
       width = .07,
    )+
    scale_x_discrete(limits = c("87398500", 
                                "87398980", 
                                "87398900", 
                                "87398950", 
                                "87405500", 
                                "87406900", 
                                "87409900"),
                     labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
    )+
    geom_smooth(method = "lm",
                se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
                aes(group=1),
                alpha=.5,
                na.rm = TRUE,
                size = 1)+
    theme_grafs()
)
## Warning: Transformation introduced infinite values in continuous y-axis
## Warning: Removed 134 rows containing non-finite values (`stat_boxplot()`).
## Removed 134 rows containing non-finite values (`stat_boxplot()`).
## `geom_smooth()` using formula = 'y ~ x'
## Warning: Removed 47 rows containing missing values.
## Warning: Removed 31 rows containing missing values.
## Warning: Removed 56 rows containing missing values.

Fósforo total no período 1990-2020Time for this code chunk to run: 1.74387812614441

(ptot_p1<-ggplot(plan_wide_19902020%>% 
                   filter(ANO_COLETA>"1990" &
                             ANO_COLETA<="2000"),
                 aes(CODIGO,
                     fosforo_total))+
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=0.15,
             ymax=Inf,
             alpha=1,
             fill="#ac5079")+ #>pior classe
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=0.1,
             ymax=0.15,
             alpha=1,
             fill="#fcf7ab")+ #classe 3
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=0,
             ymax=0.1,
             alpha=1,
             fill="#8dcdeb")+ #classe 1
    stat_boxplot(geom = 'errorbar',
                 width=0.3,
                 position = position_dodge(width = 0.65))+
    geom_boxplot(fill='#F8F8FF',
                 color="black",
                 outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                 width= 0.7)+
    labs(title = "Fósforo total no período 1990-2000",
         x="Estação",
         y="mg/L")+
    ggbeeswarm::geom_quasirandom(
       size = 1.2,
       alpha = .25,
       width = .07,
    )+
    scale_y_continuous(expand = expansion(mult = c(0.03,0.03)),
                       n.breaks = 8,
                       limits = c(min(plan_wide_19902020$fosforo_total, na.rm = TRUE),
                                  max(plan_wide_19902020$fosforo_total), na.rm = TRUE),
                       trans = "log10")+
    scale_x_discrete(limits = c("87398500", 
                                "87398980", 
                                "87398900", 
                                "87398950", 
                                "87405500", 
                                "87406900", 
                                "87409900"),
                     labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
    )+
    geom_smooth(method = "lm",
                se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
                aes(group=1),
                alpha=.5,
                na.rm = TRUE,
                size = 1)+
    theme_grafs()
)

Time for this code chunk to run: 1.01013493537903

(ptot_p2 <- ggplot(plan_wide_19902020%>% 
                      filter(ANO_COLETA>"2000" &
                                ANO_COLETA<="2010"),
                   aes(CODIGO,
                       fosforo_total))+
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=0.15,
             ymax=Inf,
             alpha=1,
             fill="#ac5079")+ #>pior classe
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=0.1,
             ymax=0.15,
             alpha=1,
             fill="#fcf7ab")+ #classe 3
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=0,
             ymax=0.1,
             alpha=1,
             fill="#8dcdeb")+ #classe 1
    stat_boxplot(geom = 'errorbar',
                 width=0.3,
                 position = position_dodge(width = 0.65))+
    geom_boxplot(fill='#F8F8FF',
                 color="black",
                 outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                 width= 0.7)+
    labs(title = "Fósforo total no período 2000-2010",
         x="Estação",
         y="mg/L")+
   scale_y_continuous(expand = expansion(mult = c(0.03,0.03)),
                      n.breaks = 8,
                      limits = c(min(plan_wide_19902020$fosforo_total, na.rm = TRUE),
                                 max(plan_wide_19902020$fosforo_total), na.rm = TRUE),
                      trans = "log10")+
    ggbeeswarm::geom_quasirandom(
       size = 1.2,
       alpha = .25,
       width = .07,
    )+
    scale_x_discrete(limits = c("87398500", 
                                "87398980", 
                                "87398900", 
                                "87398950", 
                                "87405500", 
                                "87406900", 
                                "87409900"),
                     labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
    )+
    geom_smooth(method = "lm",
                se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
                aes(group=1),
                alpha=.5,
                na.rm = TRUE,
                size = 1)+
    theme_grafs()
)

Time for this code chunk to run: 0.853737115859985

(ptot_p3 <- ggplot(plan_wide_19902020%>% 
                      filter(ANO_COLETA>"2010" &
                                ANO_COLETA<="2020"),
                   aes(CODIGO,
                       fosforo_total))+
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=0.15,
             ymax=Inf,
             alpha=1,
             fill="#ac5079")+ #>pior classe
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=0.1,
             ymax=0.15,
             alpha=1,
             fill="#fcf7ab")+ #classe 3
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=0,
             ymax=0.1,
             alpha=1,
             fill="#8dcdeb")+ #classe 1
    stat_boxplot(geom = 'errorbar',
                 width=0.3,
                 position = position_dodge(width = 0.65))+
    geom_boxplot(fill='#F8F8FF',
                 color="black",
                 outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                 width= 0.7)+
    labs(title = "Fósforo total no período 2010-2020",
         x="Estação",
         y="mg/L")+
    scale_y_continuous(expand = expansion(mult = c(0.03,0.03)),
                       n.breaks = 8,
                       limits = c(min(plan_wide_19902020$fosforo_total, na.rm = TRUE),
                                  max(plan_wide_19902020$fosforo_total), na.rm = TRUE),
                       trans = "log10")+
   ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
    geom_smooth(method = "lm",
                se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
                aes(group=1),
                alpha=.5,
                na.rm = TRUE,
                size = 1)+
    theme_grafs()
)

Time for this code chunk to run: 0.713698148727417

grid.arrange(ptot_p1, ptot_p2, ptot_p3, ncol = 3)

Time for this code chunk to run: 2.00980401039124

(sum_ptot_p1 <- plan_wide_19902020 %>%
    select(CODIGO, fosforo_total, ANO_COLETA) %>% 
   filter(ANO_COLETA>"1990" &
            ANO_COLETA<="2000") %>% 
   group_by(CODIGO) %>% 
   summarize(
     min = 
       min(fosforo_total, na.rm = TRUE),
     q1 = 
       quantile(fosforo_total, 0.25, na.rm = TRUE),
     median = 
       median(fosforo_total, na.rm = TRUE),
     mean = 
       mean(fosforo_total, na.rm= TRUE),
     q3 = 
       quantile(fosforo_total, 0.75, na.rm = TRUE),
     max = 
       max(fosforo_total, na.rm = TRUE)))
## # A tibble: 7 × 7
##   CODIGO      min     q1 median   mean     q3   max
##   <chr>     <dbl>  <dbl>  <dbl>  <dbl>  <dbl> <dbl>
## 1 87398500 0.0097 0.0593 0.0881 0.123  0.14   0.863
## 2 87398900 0.0023 0.0468 0.0678 0.0747 0.0883 0.247
## 3 87398950 0.0202 0.0544 0.0737 0.0751 0.0904 0.179
## 4 87398980 0.01   0.0254 0.0547 0.0708 0.114  0.189
## 5 87405500 0.017  0.171  0.281  0.417  0.492  2.32 
## 6 87406900 0.156  0.270  0.508  0.785  1.07   2.79 
## 7 87409900 0.107  0.258  0.384  0.489  0.712  1.53
(sum_ptot_p2 <- plan_wide_19902020 %>%
    select(CODIGO, fosforo_total, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2000" &
             ANO_COLETA<="2010") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(fosforo_total, na.rm = TRUE),
      q1 = 
        quantile(fosforo_total, 0.25, na.rm = TRUE),
      median = 
        median(fosforo_total, na.rm = TRUE),
      mean = 
        mean(fosforo_total, na.rm= TRUE),
      q3 = 
        quantile(fosforo_total, 0.75, na.rm = TRUE),
      max = 
        max(fosforo_total, na.rm = TRUE)))
## # A tibble: 7 × 7
##   CODIGO      min     q1 median  mean    q3   max
##   <chr>     <dbl>  <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500 0.025  0.094   0.131 0.148 0.16  0.637
## 2 87398900 0.015  0.0764  0.104 0.140 0.164 0.646
## 3 87398950 0.036  0.116   0.171 0.180 0.207 0.485
## 4 87398980 0.0115 0.052   0.076 0.101 0.103 1    
## 5 87405500 0.046  0.261   0.406 0.547 0.681 1.98 
## 6 87406900 0.056  0.338   0.599 0.752 0.967 3.49 
## 7 87409900 0.043  0.325   0.624 0.677 0.989 1.57
(sum_ptot_p3 <- plan_wide_19902020 %>%
    select(CODIGO, fosforo_total, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2010" &
             ANO_COLETA<="2020") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(fosforo_total, na.rm = TRUE),
      q1 = 
        quantile(fosforo_total, 0.25, na.rm = TRUE),
      median = 
        median(fosforo_total, na.rm = TRUE),
      mean = 
        mean(fosforo_total, na.rm= TRUE),
      q3 = 
        quantile(fosforo_total, 0.75, na.rm = TRUE),
      max = 
        max(fosforo_total, na.rm = TRUE)))
## # A tibble: 7 × 7
##   CODIGO     min     q1 median  mean    q3   max
##   <chr>    <dbl>  <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500 0.061 0.118   0.163 0.166 0.186 0.381
## 2 87398900 0.057 0.0935  0.130 0.163 0.168 0.444
## 3 87398950 0.07  0.132   0.156 0.292 0.221 3.11 
## 4 87398980 0.019 0.0625  0.106 0.144 0.170 0.59 
## 5 87405500 0.013 0.187   0.332 0.361 0.45  0.803
## 6 87406900 0.089 0.254   0.364 0.448 0.560 1.26 
## 7 87409900 0.203 0.259   0.369 0.488 0.564 1.7

Time for this code chunk to run: 0.241081953048706

ggsave("ptot.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = ptot,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("ptot_p1.png",
       plot = ptot_p1,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("ptot_p2.png",
       plot = ptot_p2,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("ptot_p3.png",
       plot = ptot_p3,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("ptot_3periodos.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = grid.arrange(ptot_p1, ptot_p2, ptot_p3, ncol = 3),
       path = "./graficos",
       dpi = 300,
       type = "cairo")

Time for this code chunk to run: 7.53798890113831

9.0.4 Escherichia coli

ecoli__class <- function() {
  list(annotate("rect",
                xmin=-Inf,
                xmax=Inf,
                ymin=3200,
                ymax=Inf,
                alpha=1,
                fill="#ac5079")+ #>pior classe
         annotate("rect",
                  xmin=-Inf,
                  xmax=Inf,
                  ymin=800,
                  ymax=3200,
                  alpha=1,
                  fill="#fcf7ab")+ #classe 3
         annotate("rect",
                  xmin=-Inf,
                  xmax=Inf,
                  ymin=160,
                  ymax=800,
                  alpha=1,
                  fill="#70c18c")+ #classe 2
         annotate("rect",
                  xmin=-Inf,
                  xmax=Inf,
                  ymin=0,
                  ymax=160,
                  alpha=1,
                  fill="#8dcdeb") #classe 1
  )
}
  
(ecoli <- ggplot(plan_wide_19902020,
                 aes(CODIGO,
                     E_coli))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=3200,
            ymax=Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=800,
            ymax=3200,
            alpha=1,
            fill="#fcf7ab")+ #classe 3
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=160,
            ymax=800,
            alpha=1,
            fill="#70c18c")+ #classe 2
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=0,
            ymax=160,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   facet_wrap(~periodo)+
   labs(title = "*Escherichia coli* no período 1990-2020",
        x="Estação",
        y="NMP/100mL")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.01)),
                      # n.breaks = 9,
                      n.breaks = 6,
                      limits = c(min(plan_wide_19902020$E_coli, na.rm = TRUE),
                                 max(plan_wide_19902020$E_coli, na.rm = TRUE)),
                      trans = "log10",
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
   ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()+
    theme(
        axis.text.y = element_text(
          angle = 90, 
          # size=15,
          # face=2
        ),
        plot.title = 
          element_markdown(
            hjust = 0.5,
            color = "black",
            size = 19)
    )
)

Escherichia-coli-gravataí no período 1990-2020Time for this code chunk to run: 1.69103384017944

(ecoli_p1 <- ggplot(plan_wide_19902020 %>% 
                       filter(ANO_COLETA>"1990" &
                                 ANO_COLETA<="2000"),
                    aes(CODIGO,
                        E_coli))+
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=3200,
             ymax=Inf,
             alpha=1,
             fill="#ac5079")+ #>pior classe
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=800,
             ymax=3200,
             alpha=1,
             fill="#fcf7ab")+ #classe 3
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=160,
             ymax=800,
             alpha=1,
             fill="#70c18c")+ #classe 2
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=0,
             ymax=160,
             alpha=1,
             fill="#8dcdeb")+ #classe 1
    stat_boxplot(geom = 'errorbar',
                 width=0.3,
                 position = position_dodge(width = 0.65))+
    geom_boxplot(fill='#F8F8FF',
                 color="black",
                 outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                 width= 0.7)+
    labs(title = "Escherichia coli no período 1990-2000",
         x="Estação",
         y="NMP/100mL")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.01)),
                      n.breaks = 9,
                      limits = c(min(plan_wide_19902020$E_coli, na.rm = TRUE),
                                 max(plan_wide_19902020$E_coli, na.rm = TRUE)),
                      trans = "log10",
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
       size = 1.2,
       alpha = .25,
       width = .07,
    )+
    scale_x_discrete(limits = c("87398500", 
                                "87398980", 
                                "87398900", 
                                "87398950", 
                                "87405500", 
                                "87406900", 
                                "87409900"),
                     labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
    )+
    geom_smooth(method = "lm",
                se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
                aes(group=1),
                alpha=.5,
                na.rm = TRUE,
                size = 1)+
    theme_grafs()
)

Time for this code chunk to run: 0.863179206848145

(ecoli_p2 <- ggplot(plan_wide_19902020 %>% 
                       filter(ANO_COLETA>"2000" &
                                 ANO_COLETA<="2010"),
                    aes(CODIGO,
                        E_coli))+
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=3200,
             ymax=Inf,
             alpha=1,
             fill="#ac5079")+ #>pior classe
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=800,
             ymax=3200,
             alpha=1,
             fill="#fcf7ab")+ #classe 3
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=160,
             ymax=800,
             alpha=1,
             fill="#70c18c")+ #classe 2
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=0,
             ymax=160,
             alpha=1,
             fill="#8dcdeb")+ #classe 1
    stat_boxplot(geom = 'errorbar',
                 width=0.3,
                 position = position_dodge(width = 0.65))+
    geom_boxplot(fill='#F8F8FF',
                 color="black",
                 outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                 width= 0.7)+
    labs(title = "Escherichia coli no período 2000-2010",
         x="Estação",
         y="NMP/100mL")+
    scale_y_continuous(expand = expansion(mult = c(0.01, 0.01)),
                       n.breaks = 9,
                       limits = c(min(plan_wide_19902020$E_coli, na.rm = TRUE),
                                  max(plan_wide_19902020$E_coli, na.rm = TRUE)),
                       trans = "log10",
                       labels = scales::number_format(accuracy = 1,
                                                      decimal.mark = ",",
                                                      big.mark = " "))+
   ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
    geom_smooth(method = "lm",
                se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
                aes(group=1),
                alpha=.5,
                na.rm = TRUE,
                size = 1)+
    theme_grafs()
)

Time for this code chunk to run: 0.85694408416748

(ecoli_p3 <- ggplot(plan_wide_19902020 %>% 
                       filter(ANO_COLETA>"2010" &
                                 ANO_COLETA<="2020"),
                    aes(CODIGO,
                        E_coli))+
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=3200,
             ymax=Inf,
             alpha=1,
             fill="#ac5079")+ #>pior classe
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=800,
             ymax=3200,
             alpha=1,
             fill="#fcf7ab")+ #classe 3
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=160,
             ymax=800,
             alpha=1,
             fill="#70c18c")+ #classe 2
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=0,
             ymax=160,
             alpha=1,
             fill="#8dcdeb")+ #classe 1
    stat_boxplot(geom = 'errorbar',
                 width=0.3,
                 position = position_dodge(width = 0.65))+
    geom_boxplot(fill='#F8F8FF',
                 color="black",
                 outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                 width= 0.7)+
    labs(title = "Escherichia coli no período 2010-2020",
         x="Estação",
         y="NMP/100mL")+
    scale_y_continuous(expand = expansion(mult = c(0.01, 0.01)),
                       n.breaks = 9,
                       limits = c(min(plan_wide_19902020$E_coli, na.rm = TRUE),
                                  max(plan_wide_19902020$E_coli, na.rm = TRUE)),
                       trans = "log10",
                       labels = scales::number_format(accuracy = 1,
                                                      decimal.mark = ",",
                                                      big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
    geom_smooth(method = "lm",
                se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
                aes(group=1),
                alpha=.5,
                na.rm = TRUE,
                size = 1)+
    theme_grafs()
)

Time for this code chunk to run: 0.78161883354187

grid.arrange(ecoli_p1, ecoli_p2, ecoli_p3, ncol = 3)

Time for this code chunk to run: 2.40403604507446

(sum_ecoli_p1 <- plan_wide_19902020 %>%
    select(CODIGO, E_coli, ANO_COLETA) %>% 
    filter(ANO_COLETA>"1990" &
              ANO_COLETA<="2000") %>% 
   group_by(CODIGO) %>% 
   summarize(
     min = 
       min(E_coli, 
           na.rm = TRUE),
     q1 = 
       quantile(E_coli, 0.25, 
                na.rm = TRUE),
     median = 
       median(E_coli, 
              na.rm = TRUE),
     mean = 
       mean(E_coli, 
            na.rm= TRUE),
     q3 = 
       quantile(E_coli, 0.75, 
                na.rm = TRUE),
     max = 
       max(E_coli, 
           na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median   mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl>  <dbl> <dbl> <dbl>
## 1 87398500  32   136     240   854.    720 19200
## 2 87398900  16    68     160   548.    480  7760
## 3 87398950   2.4  12.8   268  4039.  10000 28000
## 4 87398980   4   160     243. 2907.    446 25600
## 5 87405500   1.6  12.8    24   545.    128 18400
## 6 87406900  13.6  61.6   192   718.    414 12800
## 7 87409900   2.4  12.8    64    97.7   128   720
(sum_ecoli_p2 <- plan_wide_19902020 %>%
    select(CODIGO, E_coli, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2000" &
             ANO_COLETA<="2010") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(E_coli, 
            na.rm = TRUE),
      q1 = 
        quantile(E_coli, 0.25, 
                 na.rm = TRUE),
      median = 
        median(E_coli, 
               na.rm = TRUE),
      mean = 
        mean(E_coli, 
             na.rm= TRUE),
      q3 = 
        quantile(E_coli, 0.75, 
                 na.rm = TRUE),
      max = 
        max(E_coli, 
            na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median   mean     q3    max
##   <chr>    <dbl> <dbl>  <dbl>  <dbl>  <dbl>  <dbl>
## 1 87398500  21.6   91    150   1335.   308   27200
## 2 87398900  11     70    133.   444.   414.   2600
## 3 87398950  20    400    720    935.  1120    5500
## 4 87398980  24    110.   195    410.   289.   8800
## 5 87405500   4.7  162   2400  25445. 12950  490000
## 6 87406900   8    172  12800  66370. 62300  650000
## 7 87409900  16   7355. 35500  72440. 68750  460000
(sum_ecoli_p3 <- plan_wide_19902020 %>%
    select(CODIGO, E_coli, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2010" &
             ANO_COLETA<="2020") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(E_coli, 
            na.rm = TRUE),
      q1 = 
        quantile(E_coli, 0.25, 
                 na.rm = TRUE),
      median = 
        median(E_coli, 
               na.rm = TRUE),
      mean = 
        mean(E_coli, 
             na.rm= TRUE),
      q3 = 
        quantile(E_coli, 0.75, 
                 na.rm = TRUE),
      max = 
        max(E_coli, 
            na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO      min      q1 median    mean      q3      max
##   <chr>     <dbl>   <dbl>  <dbl>   <dbl>   <dbl>    <dbl>
## 1 87398500   90     155.    260     409.    451     2420 
## 2 87398900   10      52.8   107     245.    313     1553.
## 3 87398950  108.    250     487    1424.   1553.   10462 
## 4 87398980   40.8   140.    242.    529.    738.    2400 
## 5 87405500  632    8965   19232. 109992.  70750  1400000 
## 6 87406900 1440   23100   34500  230828. 140500  3400000 
## 7 87409900 2000   20100   38400   83128.  83680   345000

Time for this code chunk to run: 0.287384986877441

ggsave("ecoli.png",
       plot = ecoli,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("ecoli_p1.png",
       plot = ecoli_p1,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("ecoli_p2.png",
       plot = ecoli_p2,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("ecoli_p3.png",
       plot = ecoli_p3,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("ecoli_3periodos.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = grid.arrange(ecoli_p1, ecoli_p2, ecoli_p3, ncol = 3),
       path = "./graficos",
       dpi = 300,
       type = "cairo")

Time for this code chunk to run: 9.12989902496338

9.0.5 Nitrogênio amoniacal

(namon <- ggplot(plan_wide_19902020,
                 aes(CODIGO,
                     nitro_amon))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=13.3,
            ymax=Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=3.7,
            ymax=13.3,
            alpha=1,
            fill="#fcf7ab")+ #classe 3
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=0,
            ymax=3.7,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   facet_wrap(~periodo)+
   labs(title = "Nitrogênio amoniacal no período 1990-2020",
        x="Estação",
        y="mg/L")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.05)),
                      n.breaks = 9,
                      limits = c(min(plan_wide_19902020$nitro_total, na.rm = TRUE),
                                 max(plan_wide_19902020$nitro_total, na.rm = TRUE)),
                      trans = "log10",
                      labels = scales::number_format(accuracy = .001,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
   ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

nitrogenio-gravataí no período 1990-2020Time for this code chunk to run: 1.39606714248657

periodo_inicial <- as.Date("1990-01-01", "%Y-%m-%d")
periodo_final <- as.Date("2021-01-01",  "%Y-%m-%d")

(nitro_line <- 
    plan_wide_19902020 %>%
    filter(ANO_COLETA > "1990" &
             ANO_COLETA <= "2020") %>%
    dplyr::select(CODIGO, nitro_amon, DATA_COLETA, periodo) %>%
    group_by(CODIGO) %>%
    # pivot_wider(
    #   names_from = CODIGO,
    #   values_from = nitro_amon,
    #   id_cols = DATA_COLETA
    # ) %>% 
    ggplot(
      aes(x = DATA_COLETA,
          y = nitro_amon,
          # color = CODIGO
      ))+
    # geom_rect(
    #   aes(xmin = periodo_inicial, 
    #       xmax = periodo_final,
    #       ymin = 13.3, 
    #       ymax = Inf,
    #       alpha= 0.005,
    #       fill= "#ac5079"),
    # show.legend = FALSE)+ #>pior classe
    # geom_rect(
    #   aes(xmin = periodo_inicial, 
    #       xmax = periodo_final,
  #       ymin= 3.7,
  #       ymax= 13.3,
  #       alpha= 0.005,
  #       fill= "#fcf7ab"),
  #    show.legend = FALSE)+ #classe 3
  # geom_rect(
  #   aes(xmin = periodo_inicial, 
  #       xmax = periodo_final,
  #       ymin= 0,
  #       ymax= 3.7,
  #       alpha= 0.005,
  #       fill= "blue"
  #         # "#8dcdeb"
  #         ),
  #    show.legend = FALSE)+ #classe 1
  annotate("rect",
           xmin= periodo_inicial,
           xmax= periodo_final,
           ymin=13.3,
           ymax=Inf,
           alpha= 0.7,
           fill="#ac5079")+ #>pior classe
    annotate("rect",
             xmin= periodo_inicial,
             xmax= periodo_final,
             ymin=3.7,
             ymax=13.3,
             alpha= 0.7,
             fill="#fcf7ab")+ #classe 3
    annotate("rect",
             xmin= periodo_inicial,
             xmax= periodo_final,
             ymin= -Inf,
             ymax=3.7,
             alpha= 0.7,
             fill="#8dcdeb")+ #classe 1
    geom_line(
      # aes(color = CODIGO),
      na.rm = TRUE)+
    geom_point(
      # aes(color = CODIGO),
      na.rm = TRUE)+
    scale_x_date(
      limits = as.Date(c(
        "1990-01-01", 
        "2021-01-01"
        # NA #pode usar NA também
      )),
      expand = c(0.0, 0.0),
      date_breaks = "10 years",
      minor_breaks = "5 years",
      date_labels = "%Y",
    )+
    # geom_smooth(
    #   # aes(color = CODIGO),
    #   method = "lm",
    #   # formula = y ~ poly(x, 2),
    #   # span = 0.2,
    #   se = TRUE, #se deixar TRUE gera o intervalo de confiança de 95%
    #   aes(group = 1),
    #   alpha =.5,
    #   na.rm = TRUE,
    #   size = 0.3,
    #   # fullrange = TRUE,
  #   # show.legend = TRUE
  # )+
  # stat_smooth(
  #   geom = "smooth",
  #   # span = 0.2,
  #   se = FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
  #   # aes(group = 1),
  #   # alpha =.5,
  #   na.rm = TRUE,
  #   # size = 0.3,
  #   fullrange = TRUE,
  #   show.legend = TRUE
  # )+
  facet_wrap(
    ~CODIGO,
    nrow = 4,
  )+
    theme_bw()
)

Time for this code chunk to run: 1.01748991012573

(namon_p1 <- ggplot(plan_wide_19902020 %>% 
                      filter(ANO_COLETA>"1990" &
                               ANO_COLETA<="2000"),
                    aes(CODIGO,
                        nitro_total))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=13.3,
            ymax=Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=3.7,
             ymax=13.3,
             alpha=1,
             fill="#fcf7ab")+ #classe 3
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=0,
             ymax=3.7,
             alpha=1,
             fill="#8dcdeb")+ #classe 1
    stat_boxplot(geom = 'errorbar',
                 width=0.3,
                 position = position_dodge(width = 0.65))+
    geom_boxplot(fill='#F8F8FF',
                 color="black",
                 outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                 width= 0.7)+
   labs(title = "Nitrogênio amoniacal no período 1990-2000",
        x="Estação",
        y="mg/L")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.05)),
                      n.breaks = 9,
                      limits = c(min(plan_wide_19902020$nitro_total, na.rm = TRUE),
                                 max(plan_wide_19902020$nitro_total, na.rm = TRUE)),
                      trans = "log10",
                      labels = scales::number_format(accuracy = .001,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

Time for this code chunk to run: 0.886121034622192

(namon_p2 <- ggplot(plan_wide_19902020 %>% 
                      filter(ANO_COLETA>"2000" &
                               ANO_COLETA<="2010"),
                    aes(CODIGO,
                        nitro_total))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=13.3,
            ymax=Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=3.7,
            ymax=13.3,
            alpha=1,
            fill="#fcf7ab")+ #classe 3
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=0,
            ymax=3.7,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   labs(title = "Nitrogênio amoniacal no período 2000-2010",
        x="Estação",
        y="mg/L")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.05)),
                      n.breaks = 9,
                      limits = c(min(plan_wide_19902020$nitro_total, na.rm = TRUE),
                                 max(plan_wide_19902020$nitro_total, na.rm = TRUE)),
                      trans = "log10",
                      labels = scales::number_format(accuracy = .001,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

Time for this code chunk to run: 0.788445949554443

(namon_p3 <- ggplot(plan_wide_19902020 %>% 
                       filter(ANO_COLETA>"2010" &
                                 ANO_COLETA<="2020"),
                    aes(CODIGO,
                        nitro_total))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=13.3,
            ymax=Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=3.7,
            ymax=13.3,
            alpha=1,
            fill="#fcf7ab")+ #classe 3
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=0,
            ymax=3.7,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   labs(title = "Nitrogênio amoniacal no período 2010-2020",
        x="Estação",
        y="mg/L")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.05)),
                      n.breaks = 9,
                      limits = c(min(plan_wide_19902020$nitro_total, na.rm = TRUE),
                                 max(plan_wide_19902020$nitro_total, na.rm = TRUE)),
                      trans = "log10",
                      labels = scales::number_format(accuracy = .001,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

Time for this code chunk to run: 0.731498003005981

grid.arrange(namon_p1, namon_p2, namon_p3, ncol = 3)

Time for this code chunk to run: 2.17817807197571

(sum_namon_p1 <- plan_wide_19902020 %>%
   select(CODIGO, nitro_total, ANO_COLETA) %>% 
   filter(ANO_COLETA>"1990" &
            ANO_COLETA<="2000") %>% 
   group_by(CODIGO) %>% 
   summarize(
     min = 
       min(nitro_total, 
           na.rm = TRUE),
     q1 = 
       quantile(nitro_total, 0.25, 
                na.rm = TRUE),
     median = 
       median(nitro_total, 
              na.rm = TRUE),
     mean = 
       mean(nitro_total, 
            na.rm= TRUE),
     q3 = 
       quantile(nitro_total, 0.75, 
                na.rm = TRUE),
     max = 
       max(nitro_total, 
           na.rm = TRUE),
      n = 
       length(nitro_total)
   )
)
## # A tibble: 7 × 8
##   CODIGO     min    q1 median  mean    q3   max     n
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl> <int>
## 1 87398500 0.44  0.842  1.00  1.22   1.34  3.81   101
## 2 87398900 0.22  0.82   1     1.09   1.25  4.86   101
## 3 87398950 0.51  0.83   1.02  1.06   1.19  2.16    68
## 4 87398980 0.549 0.68   0.755 0.872  1.01  1.85    30
## 5 87405500 0.51  1.53   2.94  5.27   6.77 21.6     97
## 6 87406900 1.34  2.60   4.56  7.58  11.2  29.1     32
## 7 87409900 0.5   1.98   4.29  5.18   7.01 19.6     65
(sum_namon_p2 <- plan_wide_19902020 %>%
    select(CODIGO, nitro_total, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2000" &
             ANO_COLETA<="2010") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(nitro_total, 
            na.rm = TRUE),
      q1 = 
        quantile(nitro_total, 0.25, 
                 na.rm = TRUE),
      median = 
        median(nitro_total, 
               na.rm = TRUE),
      mean = 
        mean(nitro_total, 
             na.rm= TRUE),
      q3 = 
        quantile(nitro_total, 0.75, 
                 na.rm = TRUE),
      max = 
        max(nitro_total, 
            na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500 0.18  0.885  0.992  1.80  1.46 23.2 
## 2 87398900 0.48  0.894  1.13   1.38  1.57  7.92
## 3 87398950 0.57  1.26   1.45   1.43  1.71  1.98
## 4 87398980 0.19  0.685  0.79   1.05  1.10  5.2 
## 5 87405500 0.968 2      3.29   5.45  6.60 21.7 
## 6 87406900 0.77  2.4    4.54   7.30 10.2  39.1 
## 7 87409900 1.62  2.5    6.97   7.92 10.6  21.5
(sum_namon_p3 <- plan_wide_19902020 %>%
    select(CODIGO, nitro_total, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2010" &
             ANO_COLETA<="2020") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(nitro_total, 
            na.rm = TRUE),
      q1 = 
        quantile(nitro_total, 0.25, 
                 na.rm = TRUE),
      median = 
        median(nitro_total, 
               na.rm = TRUE),
      mean = 
        mean(nitro_total, 
             na.rm= TRUE),
      q3 = 
        quantile(nitro_total, 0.75, 
                 na.rm = TRUE),
      max = 
        max(nitro_total, 
            na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500 0.222 0.89    1.11  1.24  1.41  2.56
## 2 87398900 0.095 0.883   1.02  1.29  1.40  4.25
## 3 87398950 0.612 1.04    1.43  1.90  2.06  9.5 
## 4 87398980 0.216 0.973   1.12  1.22  1.58  2.32
## 5 87405500 1.12  2.03    3.14  4.50  5.93 22.0 
## 6 87406900 1.37  2.40    5.58  6.47  7.58 25   
## 7 87409900 1.11  3       6.15  7.29  7.75 36

Time for this code chunk to run: 0.264324188232422

ggsave("namon.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = namon,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("namon_p1.png",
       plot = namon_p1,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("namon_p2.png",
       plot = namon_p2,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("namon_p3.png",
       plot = namon_p3,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("namon_3periodos.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = grid.arrange(namon_p1, namon_p2, namon_p3, ncol = 3),
       path = "./graficos",
       dpi = 300,
       type = "cairo")

Time for this code chunk to run: 7.46358108520508

9.0.6 Turbidez

(turb <- ggplot(plan_wide_19902020,
                   aes(CODIGO,
                       turbidez))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=100,
            ymax=Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=40,
            ymax=100,
            alpha=1,
            fill="#fcf7ab")+ #classe 3
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=0,
            ymax=40,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   facet_wrap(~periodo)+
   labs(title = "Turbidez no período 1990-2020",
        x="Estação",
        y="UNT")+
   scale_y_continuous(expand = expansion(mult = c(0.05, 0.05)),
                      n.breaks = 8,
                      limits = c(
                        # 1,
                        min(plan_wide_19902020$turbidez, na.rm = TRUE),
                        # 500
                        max(plan_wide_19902020$turbidez, na.rm = TRUE)
                      ),
                      trans = "log10",
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

turbidez-gravataí no período 1990-2020Time for this code chunk to run: 1.61757397651672

(turb_line <- plan_wide_19902020 %>%
  filter(ANO_COLETA > "1990" &
           ANO_COLETA <= "2020") %>%
  select(CODIGO, turbidez, DATA_COLETA, periodo) %>%
  group_by(CODIGO) %>%
  ggplot(
    aes(x = DATA_COLETA,
        y = turbidez,
        color = CODIGO
    ))+
    geom_line(
      # aes(color = CODIGO),
      na.rm = TRUE)+
    geom_point(
      # aes(color = CODIGO),
      na.rm = TRUE)+
    scale_x_date(
      limits = as.Date(c(
        "1990-01-01", 
        "2021-01-01"
        # NA #pode usar NA também
      )),
      expand = c(0.0, 0.0),
      date_breaks = "10 years",
      minor_breaks = "5 years",
      date_labels = "%Y",
    )+
  # geom_smooth(
  #   # aes(color = CODIGO),
  #   method = "lm",
  #   # formula = y ~ poly(x, 2),
  #   # span = 0.2,
  #   se = TRUE, #se deixar TRUE gera o intervalo de confiança de 95%
  #   aes(group = 1),
  #   alpha =.5,
  #   na.rm = TRUE,
  #   size = 0.3,
  #   # fullrange = TRUE,
  #   # show.legend = TRUE
  # )+
  # stat_smooth(
  #   geom = "smooth",
  #   # span = 0.2,
  #   se = FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
  #   # aes(group = 1),
  #   # alpha =.5,
  #   na.rm = TRUE,
  #   # size = 0.3,
  #   fullrange = TRUE,
  #   show.legend = TRUE
  # )+
  facet_wrap(
    ~CODIGO,
    nrow = 4,
  )+
  theme_bw()
)

Time for this code chunk to run: 1.30168700218201

(turb_p1 <- ggplot(plan_wide_19902020 %>% 
                     filter(ANO_COLETA>"1990" &
                              ANO_COLETA<="2000"),
                   aes(CODIGO,
                       turbidez))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=100,
            ymax=Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=40,
            ymax=100,
            alpha=1,
            fill="#fcf7ab")+ #classe 3
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=0,
            ymax=40,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   labs(title = "Turbidez no período 1990-2000",
        x="Estação",
        y="UNT")+
   scale_y_continuous(expand = expansion(mult = c(0.05, 0.03)),
                      n.breaks = 8,
                      limits = c(min(plan_wide_19902020$turbidez, na.rm = TRUE),
                                 max(plan_wide_19902020$turbidez, na.rm = TRUE)),
                      trans = "log10",
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

Time for this code chunk to run: 0.816999912261963

(turb_p2 <- ggplot(plan_wide_19902020 %>% 
                     filter(ANO_COLETA>"2000" &
                              ANO_COLETA<="2010"),
                   aes(CODIGO,
                       turbidez))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=100,
            ymax=Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=40,
            ymax=100,
            alpha=1,
            fill="#fcf7ab")+ #classe 3
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=0,
            ymax=40,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   labs(title = "Turbidez no período 2000-2010",
        x="Estação",
        y="UNT")+
   scale_y_continuous(expand = expansion(mult = c(0.05, 0.03)),
                      n.breaks = 8,
                      limits = c(min(plan_wide_19902020$turbidez, na.rm = TRUE),
                                 max(plan_wide_19902020$turbidez, na.rm = TRUE)),
                      trans = "log10",
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

Time for this code chunk to run: 0.775570154190063

(turb_p3 <- ggplot(plan_wide_19902020 %>% 
                     filter(ANO_COLETA>"2010" &
                              ANO_COLETA<="2020"),
                   aes(CODIGO,
                       turbidez))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=100,
            ymax=Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=40,
            ymax=100,
            alpha=1,
            fill="#fcf7ab")+ #classe 3
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=0,
            ymax=40,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   labs(title = "Turbidez no período 2010-2020",
        x="Estação",
        y="UNT")+
   scale_y_continuous(expand = expansion(mult = c(0.05, 0.03)),
                      n.breaks = 8,
                      limits = c(min(plan_wide_19902020$turbidez, na.rm = TRUE),
                                 max(plan_wide_19902020$turbidez, na.rm = TRUE)),
                      trans = "log10",
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

Time for this code chunk to run: 0.809418916702271

grid.arrange(turb_p1, turb_p2, turb_p3, ncol = 3)

Time for this code chunk to run: 2.10943388938904

(sum_turb_p1 <- plan_wide_19902020 %>%
   select(CODIGO, turbidez, ANO_COLETA) %>% 
   filter(ANO_COLETA>"1990" &
            ANO_COLETA<="2000") %>% 
   group_by(CODIGO) %>% 
   summarize(
     min = 
       min(turbidez, 
           na.rm = TRUE),
     q1 = 
       quantile(turbidez, 0.25, 
                na.rm = TRUE),
     median = 
       median(turbidez, 
              na.rm = TRUE),
     mean = 
       mean(turbidez, 
            na.rm= TRUE),
     q3 = 
       quantile(turbidez, 0.75, 
                na.rm = TRUE),
     max = 
       max(turbidez, 
           na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500   6.2  19     34.5  63.5  67     461
## 2 87398900   9    19     49.5  61.5  73.8   460
## 3 87398950   9.6  16     22    33.3  48.8   144
## 4 87398980  16    32.8   43    66.8  90.5   190
## 5 87405500   8.5  23.5   47    47.5  58     159
## 6 87406900  33    54.8   67    77.7  81.5   199
## 7 87409900   5.8  15     25    32.2  48      76
(sum_turb_p2 <- plan_wide_19902020 %>%
    select(CODIGO, turbidez, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2000" &
             ANO_COLETA<="2010") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(turbidez, 
            na.rm = TRUE),
      q1 = 
        quantile(turbidez, 0.25, 
                 na.rm = TRUE),
      median = 
        median(turbidez, 
               na.rm = TRUE),
      mean = 
        mean(turbidez, 
             na.rm= TRUE),
      q3 = 
        quantile(turbidez, 0.75, 
                 na.rm = TRUE),
      max = 
        max(turbidez, 
            na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500     9  41.2   55.5  71.1  74.2   428
## 2 87398900    39  57     78   107.  116.    475
## 3 87398950    39  47     64    96.5  90     330
## 4 87398980    24  37     50    64.5  87     176
## 5 87405500    32  46     63.5  70.3  76     341
## 6 87406900    35  49     62    69.9  75.5   284
## 7 87409900    40  45     60    70.4  90     151
(sum_turb_p3 <- plan_wide_19902020 %>%
    select(CODIGO, turbidez, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2010" &
             ANO_COLETA<="2020") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(turbidez, 
            na.rm = TRUE),
      q1 = 
        quantile(turbidez, 0.25, 
                 na.rm = TRUE),
      median = 
        median(turbidez, 
               na.rm = TRUE),
      mean = 
        mean(turbidez, 
             na.rm= TRUE),
      q3 = 
        quantile(turbidez, 0.75, 
                 na.rm = TRUE),
      max = 
        max(turbidez, 
            na.rm = TRUE))
) 
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500  8.52  16.4   29    33.3  43     85 
## 2 87398900 14.8   39.2   48.3  66.7  73.4  299 
## 3 87398950 16     29.9   41    51.6  65    230 
## 4 87398980 11     19.4   33.6  39.5  42.2  110.
## 5 87405500 10.0   29.0   41    42.9  54.5  131 
## 6 87406900  9.62  23     39    41.2  52    122 
## 7 87409900  9.68  22.0   34.0  40.5  47    182.

Time for this code chunk to run: 0.30211615562439

ggsave("turb.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = turb,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("turb_p1.png",
       plot = turb_p1,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("turb_p2.png",
       plot = turb_p2,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("turb_p3.png",
       plot = turb_p3,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("turb_3periodos.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = grid.arrange(turb_p1, turb_p2, turb_p3, ncol = 3),
       path = "./graficos",
       dpi = 300,
       type = "cairo")

Time for this code chunk to run: 8.77911686897278

9.0.7 pH

(pH <- ggplot(plan_wide_19902020,
                 aes(CODIGO,
                     pH))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=-Inf,
            ymax=6,
            alpha=1,
            fill="#eb5661")+ #classe 4
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=9,
            ymax=Inf,
            alpha=1,
            fill="#eb5661")+ #classe 4
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=6,
            ymax=9,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   facet_wrap(~periodo)+
   labs(title = "pH no período 1990-2020",
        x="Estação",
        y="")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.01)),
                      n.breaks = 8,
                      limits = c(4,11),
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

pH-gravataí no período 1990-2020Time for this code chunk to run: 1.95946097373962

(pH_p1 <- ggplot(plan_wide_19902020 %>% 
                   filter(ANO_COLETA>"1990" &
                            ANO_COLETA<="2000"),
                 aes(CODIGO,
                     pH))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=-Inf,
            ymax=6,
            alpha=1,
            fill="#eb5661")+ #classe 4
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=9,
            ymax=Inf,
            alpha=1,
            fill="#eb5661")+ #classe 4
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=6,
            ymax=9,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   labs(title = "pH no período 1990-2000",
        x="Estação",
        y="")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.01)),
                      n.breaks = 8,
                      limits = c(4,11),
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

Time for this code chunk to run: 0.882468938827515

(pH_p2 <- ggplot(plan_wide_19902020 %>% 
                   filter(ANO_COLETA>"2000" &
                            ANO_COLETA<="2010"),
                 aes(CODIGO,
                     pH))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=-Inf,
            ymax=6,
            alpha=1,
            fill="#eb5661")+ #classe 4
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=9,
            ymax=Inf,
            alpha=1,
            fill="#eb5661")+ #classe 4
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=6,
            ymax=9,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   labs(title = "pH no período 2000-2010",
        x="Estação",
        y="")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.01)),
                      n.breaks = 8,
                      limits = c(4,11),
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

Time for this code chunk to run: 0.962517023086548

(pH_p3 <- ggplot(plan_wide_19902020 %>% 
                   filter(ANO_COLETA>"2010" &
                            ANO_COLETA<="2020"),
                 aes(CODIGO,
                     pH))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=-Inf,
            ymax=6,
            alpha=1,
            fill="#eb5661")+ #classe 4
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=9,
            ymax=Inf,
            alpha=1,
            fill="#eb5661")+ #classe 4
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=6,
            ymax=9,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   labs(title = "pH no período 2010-2020",
        x="Estação",
        y="")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.01)),
                      n.breaks = 8,
                      limits = c(4,11),
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

Time for this code chunk to run: 0.870226144790649

grid.arrange(pH_p1, pH_p2, pH_p3, ncol = 3)

Time for this code chunk to run: 2.31190705299377

(sum_pH_p1 <- plan_wide_19902020 %>%
   select(CODIGO, pH, ANO_COLETA) %>% 
   filter(ANO_COLETA>"1990" &
            ANO_COLETA<="2000") %>% 
   group_by(CODIGO) %>% 
   summarize(
     min = 
       min(pH, 
           na.rm = TRUE),
     q1 = 
       quantile(pH, 0.25, 
                na.rm = TRUE),
     median = 
       median(pH, 
              na.rm = TRUE),
     mean = 
       mean(pH, 
            na.rm= TRUE),
     q3 = 
       quantile(pH, 0.75, 
                na.rm = TRUE),
     max = 
       max(pH, 
           na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500   5    6.18   6.59  6.51  6.82   7.9
## 2 87398900   5.2  6      6.3   6.33  6.63   7.9
## 3 87398950   5.4  6.29   6.4   6.49  6.72   8.1
## 4 87398980   5.3  5.93   6.2   6.16  6.3    7.3
## 5 87405500   5    6.3    6.4   6.47  6.7    9.3
## 6 87406900   5.5  6.18   6.45  6.43  6.8    7.3
## 7 87409900   4.5  6.2    6.4   6.44  6.7    7.4
(sum_pH_p2 <- plan_wide_19902020 %>%
    select(CODIGO, pH, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2000" &
             ANO_COLETA<="2010") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(pH, 
            na.rm = TRUE),
      q1 = 
        quantile(pH, 0.25, 
                 na.rm = TRUE),
      median = 
        median(pH, 
               na.rm = TRUE),
      mean = 
        mean(pH, 
             na.rm= TRUE),
      q3 = 
        quantile(pH, 0.75, 
                 na.rm = TRUE),
      max = 
        max(pH, 
            na.rm = TRUE))
) 
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500   5.3   6.3   6.6   6.59  6.88   7.9
## 2 87398900   5.5   6.4   6.65  6.63  6.9    7.5
## 3 87398950   6     6.6   6.8   6.89  7.25   7.6
## 4 87398980   5.8   6.3   6.5   6.63  7      7.5
## 5 87405500   5.2   6.4   6.6   6.68  6.9    8.3
## 6 87406900   5.5   6.4   6.7   6.66  6.9    8.6
## 7 87409900   5.8   6.5   6.8   6.77  7      8.4
(sum_pH_p3 <- plan_wide_19902020 %>%
    select(CODIGO, pH, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2010" &
             ANO_COLETA<="2020") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(pH, 
            na.rm = TRUE),
      q1 = 
        quantile(pH, 0.25, 
                 na.rm = TRUE),
      median = 
        median(pH, 
               na.rm = TRUE),
      mean = 
        mean(pH, 
             na.rm= TRUE),
      q3 = 
        quantile(pH, 0.75, 
                 na.rm = TRUE),
      max = 
        max(pH, 
            na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500  5.47  6.28   6.42  6.47  6.60  7.3 
## 2 87398900  5.68  6.36   6.5   6.57  6.84  7.4 
## 3 87398950  5.71  6.28   6.46  6.46  6.68  7   
## 4 87398980  5.42  6.10   6.36  6.39  6.6   7.2 
## 5 87405500  5.64  6.34   6.5   6.49  6.7   7.01
## 6 87406900  5.6   6.4    6.48  6.51  6.77  7.3 
## 7 87409900  5.59  6.46   6.6   6.57  6.76  7.2

Time for this code chunk to run: 0.301358938217163

ggsave("pH.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = pH,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("pH_p1.png",
       plot = pH_p1,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("pH_p2.png",
       plot = pH_p2,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("pH_p3.png",
       plot = pH_p3,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("pH_3periodos.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = grid.arrange(pH_p1, pH_p2, pH_p3, ncol = 3),
       path = "./graficos",
       dpi = 300,
       type = "cairo")

Time for this code chunk to run: 8.6573498249054

9.0.8 Sólidos totais

(SolTot <- ggplot(plan_wide_19902020,
                  aes(CODIGO,
                      solidos_totais))+
   annotate("rect",
            xmin = -Inf, xmax = Inf,
            ymin = 500, ymax = Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=-Inf,
            ymax=500,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   facet_wrap(~periodo)+
   labs(title = "Sólidos totais no período 1990-2020",
        x="Estação",
        y="")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.05)),
                      n.breaks = 8,
                      limits = c(0,
                                 max(plan_wide_19902020$solidos_totais, na.rm = TRUE)),
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
   ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

sólidos-totais-gravataí no período 1990-2020Time for this code chunk to run: 1.62928700447083

(SolTot_p1 <- ggplot(plan_wide_19902020 %>% 
                       filter(ANO_COLETA>"1990" &
                                ANO_COLETA<="2000"),
                     aes(CODIGO,
                         solidos_totais))+
   annotate("rect",
            xmin = -Inf, xmax = Inf,
            ymin = 500, ymax = Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=-Inf,
            ymax=500,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   labs(title = "Sólidos totais no período 1990-2000",
        x="Estação",
        y="")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.05)),
                      n.breaks = 8,
                      limits = c(0,
                                 max(plan_wide_19902020$solidos_totais, na.rm = TRUE)),
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

Time for this code chunk to run: 0.773993968963623

(SolTot_p2 <- ggplot(plan_wide_19902020 %>% 
                       filter(ANO_COLETA>"2000" &
                                ANO_COLETA<="2010"),
                     aes(CODIGO,
                         solidos_totais))+
   annotate("rect",
            xmin = -Inf, xmax = Inf,
            ymin = 500, ymax = Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=-Inf,
            ymax=500,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   labs(title = "Sólidos totais no período 2000-2010",
        x="Estação",
        y="")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.05)),
                      n.breaks = 8,
                      limits = c(0,
                                 max(plan_wide_19902020$solidos_totais, na.rm = TRUE)),
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
       size = 1.2,
       alpha = .25,
       width = .07,
    )+
    scale_x_discrete(limits = c("87398500", 
                                "87398980", 
                                "87398900", 
                                "87398950", 
                                "87405500", 
                                "87406900", 
                                "87409900"),
                     labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
    )+
    geom_smooth(method = "lm",
                se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
                aes(group=1),
                alpha=.5,
                na.rm = TRUE,
                size = 1)+
    theme_grafs()
)

Time for this code chunk to run: 0.803251028060913

(SolTot_p3 <- ggplot(plan_wide_19902020 %>% 
                        filter(ANO_COLETA>"2010" &
                                  ANO_COLETA<="2020"),
                     aes(CODIGO,
                         solidos_totais))+
    annotate("rect",
            xmin = -Inf, xmax = Inf,
            ymin = 500, ymax = Inf,
            alpha=1,
            fill="#ac5079")+ #>pior classe
    annotate("rect",
             xmin=-Inf,
             xmax=Inf,
             ymin=-Inf,
             ymax=500,
             alpha=1,
             fill="#8dcdeb")+ #classe 1
    stat_boxplot(geom = 'errorbar',
                 width=0.3,
                 position = position_dodge(width = 0.65))+
    geom_boxplot(fill='#F8F8FF',
                 color="black",
                 outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                 width= 0.7)+
    labs(title = "Sólidos totais no período 2010-2020",
         x="Estação",
         y="")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.05)),
                      n.breaks = 8,
                      limits = c(0,
                                 max(plan_wide_19902020$solidos_totais, na.rm = TRUE)),
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
   ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

Time for this code chunk to run: 0.676017045974731

grid.arrange(SolTot_p1, SolTot_p2, SolTot_p3, ncol = 3)

Time for this code chunk to run: 2.26647806167603

(sum_SolTot_p1 <- plan_wide_19902020 %>%
   select(CODIGO, solidos_totais, ANO_COLETA) %>% 
   filter(ANO_COLETA>"1990" &
            ANO_COLETA<="2000") %>% 
   group_by(CODIGO) %>% 
   summarize(
     min = 
       min(solidos_totais, 
           na.rm = TRUE),
     q1 = 
       quantile(solidos_totais, 0.25, 
                na.rm = TRUE),
     median = 
       median(solidos_totais, 
              na.rm = TRUE),
     mean = 
       mean(solidos_totais, 
            na.rm= TRUE),
     q3 = 
       quantile(solidos_totais, 0.75, 
                na.rm = TRUE),
     max = 
       max(solidos_totais, 
           na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500    46  84.5   95   122.   120    510
## 2 87398900    18  74.5   97   111.   122.   474
## 3 87398950    10  76.5   91    90.9  106.   155
## 4 87398980    48  63.5   81.5 104.   126.   337
## 5 87405500    70 101    121   133.   151    361
## 6 87406900    89 118    155   165.   210    279
## 7 87409900    20  99.5  122   128.   143    381
(sum_SolTot_p2 <- plan_wide_19902020 %>%
    select(CODIGO, solidos_totais, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2000" &
             ANO_COLETA<="2010") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(solidos_totais, 
            na.rm = TRUE),
      q1 = 
        quantile(solidos_totais, 0.25, 
                 na.rm = TRUE),
      median = 
        median(solidos_totais, 
               na.rm = TRUE),
      mean = 
        mean(solidos_totais, 
             na.rm= TRUE),
      q3 = 
        quantile(solidos_totais, 0.75, 
                 na.rm = TRUE),
      max = 
        max(solidos_totais, 
            na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500    28  80     100  111.   123.   412
## 2 87398900    42  82     102. 128.   140.   489
## 3 87398950    46  94.2   108. 126.   127.   318
## 4 87398980    40  61      77   85.3   96    228
## 5 87405500    48 102     133  148.   170.   522
## 6 87406900    50 109     134. 154.   170.   670
## 7 87409900    56 112.    156  167.   190.   599
(sum_SolTot_p3 <- plan_wide_19902020 %>%
    select(CODIGO, solidos_totais, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2010" &
             ANO_COLETA<="2020") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(solidos_totais, 
            na.rm = TRUE),
      q1 = 
        quantile(solidos_totais, 0.25, 
                 na.rm = TRUE),
      median = 
        median(solidos_totais, 
               na.rm = TRUE),
      mean = 
        mean(solidos_totais, 
             na.rm= TRUE),
      q3 = 
        quantile(solidos_totais, 0.75, 
                 na.rm = TRUE),
      max = 
        max(solidos_totais, 
            na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500    61  69      90   82.8   96    101
## 2 87398900    41  77     104  120.   127    308
## 3 87398950    45  93     101  109.   117    221
## 4 87398980    55  62.8    80   79.9   95    109
## 5 87405500    83  89.2   108. 124.   162.   195
## 6 87406900    50 106     117  135.   163    246
## 7 87409900    75 103     115  131.   145    251

Time for this code chunk to run: 0.26396107673645

ggsave("SolTot.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = SolTot,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("SolTot_p1.png",
       plot = SolTot_p1,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("SolTot_p2.png",
       plot = SolTot_p2,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("SolTot_p3.png",
       plot = SolTot_p3,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("SolTot_3periodos.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = grid.arrange(SolTot_p1, SolTot_p2, SolTot_p3, ncol = 3),
       path = "./graficos",
       dpi = 300,
       type = "cairo")

Time for this code chunk to run: 7.96842288970947

9.0.9 IQA

iqa-gravataí no período 1990-2020Time for this code chunk to run: 1.45791888237

Time for this code chunk to run: 0.772003889083862

Time for this code chunk to run: 0.890688896179199

Time for this code chunk to run: 0.616358995437622

grid.arrange(iqa_p1, iqa_p2, iqa_p3, ncol = 3)

Time for this code chunk to run: 1.85586714744568

(sum_IQA_p1 <- plan_wide_19902020 %>%
   select(CODIGO, IQA, ANO_COLETA) %>% 
   filter(ANO_COLETA>"1990" &
            ANO_COLETA<="2000") %>% 
   group_by(CODIGO) %>% 
   summarize(
     min = 
       min(IQA, 
           na.rm = TRUE),
     q1 = 
       quantile(IQA, 0.25, 
                na.rm = TRUE),
     median = 
       median(IQA, 
              na.rm = TRUE),
     mean = 
       mean(IQA, 
            na.rm= TRUE),
     q3 = 
       quantile(IQA, 0.75, 
                na.rm = TRUE),
     max = 
       max(IQA, 
           na.rm = TRUE),
     n = 
        length(IQA)
   )
)
## # A tibble: 7 × 8
##   CODIGO     min    q1 median  mean    q3   max     n
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl> <int>
## 1 87398500  27.0  35.7   40.9  40.7  46.2  52.2   101
## 2 87398900  27.8  37.9   42.9  43.0  48.0  58.5   101
## 3 87398950  32.8  36.8   41.4  43.2  48.6  61.9    68
## 4 87398980  29.2  35.8   40.4  40.3  44.8  51.9    30
## 5 87405500  24.8  34.9   41.2  40.3  46.9  57.6    97
## 6 87406900  24.7  31.3   37.8  37.4  44.4  49.0    32
## 7 87409900  23.6  31.9   37.1  38.8  46.2  55.4    65
(sum_IQA_p2 <- plan_wide_19902020 %>%
    select(CODIGO, IQA, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2000" &
             ANO_COLETA<="2010") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(IQA, 
            na.rm = TRUE),
      q1 = 
        quantile(IQA, 0.25, 
                 na.rm = TRUE),
      median = 
        median(IQA, 
               na.rm = TRUE),
      mean = 
        mean(IQA, 
             na.rm= TRUE),
      q3 = 
        quantile(IQA, 0.75, 
                 na.rm = TRUE),
      max = 
        max(IQA, 
            na.rm = TRUE),
      n = 
        length(IQA)
      )
)
## # A tibble: 7 × 8
##   CODIGO     min    q1 median  mean    q3   max     n
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl> <int>
## 1 87398500  27.8  34.6   40.0  39.5  43.5  48.7    75
## 2 87398900  28.5  35.1   37.6  38.3  40.6  48.5    77
## 3 87398950  21.1  29.4   32.7  32.8  36.8  44.0    30
## 4 87398980  24.5  35.7   39.4  39.5  43.4  52.1    66
## 5 87405500  19.8  28.7   31.5  31.9  35.7  48.8    78
## 6 87406900  17.1  25.3   29.0  29.5  32.8  44.1    79
## 7 87409900  16.2  20.5   26.1  25.0  29.8  33.1    31
(sum_IQA_p3 <- plan_wide_19902020 %>%
    select(CODIGO, IQA, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2010" &
             ANO_COLETA<="2020") %>%
    # ?as_factor(CODIGO) %>% 
    group_by(CODIGO) %>%
    summarize(
      min = 
        min(IQA, 
            na.rm = TRUE),
      q1 = 
        quantile(IQA, 0.25, 
                 na.rm = TRUE),
      median = 
        median(IQA, 
               na.rm = TRUE),
      mean = 
        mean(IQA, 
             na.rm= TRUE),
      q3 = 
        quantile(IQA, 0.75, 
                 na.rm = TRUE),
      max = 
        max(IQA, 
            na.rm = TRUE),
      n = 
        length(IQA),
      NAs = 
        sum(is.na(IQA))
      ) %>% 
  mutate(
    "%NA" = NAs/n*100
  )
)
## # A tibble: 7 × 10
##   CODIGO     min    q1 median  mean    q3   max     n   NAs `%NA`
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl> <int> <int> <dbl>
## 1 87398500  40.2  42.5   45.4  44.2  45.5  47.2    34    29  85.3
## 2 87398900  34.1  38.6   41.2  40.2  42.9  44.4    36    32  88.9
## 3 87398950  36.7  39.5   42.4  41.5  44.4  44.6    35    31  88.6
## 4 87398980  40.0  40.0   40.0  40.0  40.0  40.0    28    27  96.4
## 5 87405500  30.8  31.6   32.5  32.5  33.3  34.1    33    31  93.9
## 6 87406900  22.9  24.4   25.9  25.3  26.5  27.2    35    32  91.4
## 7 87409900  24.1  25.1   27.3  26.9  28.2  29.7    37    32  86.5

Time for this code chunk to run: 0.291854858398438

ggsave("iqa.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = iqa,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("iqa_p1.png",
       plot = iqa_p1,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("iqa_p2.png",
       plot = iqa_p2,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("iqa_p3.png",
       plot = iqa_p3,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("iqa_3periodos.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = grid.arrange(iqa_p1, iqa_p2, iqa_p3, ncol = 3),
       path = "./graficos",
       dpi = 300,
       type = "cairo")

Time for this code chunk to run: 7.98398303985596

9.1 Testando coisas

9.1.1 Correlação

parametros_IQA %>% 
  dplyr::select(
    -CODIGO,
    -nitro_total) %>% 
  # group_by(CODIGO) %>% 
  rename(
    CE = Condutividade,
    OD = oxigenio_dissolvido,
    ST = solidos_totais,
    Turb = turbidez,
    Temp = temp_agua,
    Ptot = fosforo_total,
    NAmon = nitro_amon,
    NTK = nitro_kjeldahl
  ) %>% 
  ggcorr(
    method = "complete.obs",
    # "pearson",
    # "pairwise",
    name = "Correlação",
    label = TRUE,
    label_alpha = TRUE,
    digits = 3,
    low = "#3B9AB2",
    mid = "#EEEEEE",
    high = "#F21A00",
    # palette = "RdYlBu",
    layout.exp = 0,
    legend.position = "left",
    label_round = 3,
    # legend.size = 18,
    geom = "tile",
    nbreaks = 10,
  )+
  labs(title = "Correlação entre parâmetros físico-químicos na\nBacia Hidrográfica do rio Gravataí no período 1990-2020")+
  theme_linedraw()+
  theme(
    legend.position = c(0.15, 0.6),
    legend.title = element_text(size = 16),
    legend.text = element_text(size = 14),
    # legend.spacing = unit(element_text(),
                          # units = 5)
    plot.title = element_text(hjust = 0.5,
                              size = 16)
  )

correlação-parametros-qualidade-agua-gravataí no período 1990-2020

# Gráfico das correlações entre todos os parâmetros com significância
correl_IQA <- parametros_IQA %>%
  dplyr::select(-CODIGO) %>%
  ggpairs(title = "Correlação entre parâmetros que compõem o IQA",
          axisLabels = "show")

correlacao_pIQA <- parametros_IQA %>% 
  group_by(CODIGO) %>% 
  correlation::correlation()

correlacao_pIQA %>% 
  # glimpse()
  filter(
    p < 0.001
  ) %>% 
  t() %>% 
  summary()
##  87398500 - DBO   87398500 - nitro_kjeldahl 87398500 - nitro_total
##  Min.   :0.4176   Min.   :0.4105            Min.   :0.4915        
##  1st Qu.:1.0000   1st Qu.:0.7854            1st Qu.:1.0000        
##  Median :1.0000   Median :1.0000            Median :1.0000        
##  Mean   :0.9552   Mean   :0.8634            Mean   :0.9609        
##  3rd Qu.:1.0000   3rd Qu.:1.0000            3rd Qu.:1.0000        
##  Max.   :1.0000   Max.   :1.0000            Max.   :1.0000        
##  87398500 - fosforo_total 87398500 - temp_agua 87398500 - turbidez
##  Min.   :0.3641           Min.   :-0.4765      Min.   :0.3641     
##  1st Qu.:1.0000           1st Qu.: 1.0000      1st Qu.:1.0000     
##  Median :1.0000           Median : 1.0000      Median :1.0000     
##  Mean   :0.8668           Mean   : 0.8864      Mean   :0.9133     
##  3rd Qu.:1.0000           3rd Qu.: 1.0000      3rd Qu.:1.0000     
##  Max.   :1.0000           Max.   : 1.0000      Max.   :1.0000     
##  87398500 - oxigenio_dissolvido 87398500 - nitro_amon 87398500 - pH
##  Min.   :-0.4765                Min.   :1             Min.   :1    
##  1st Qu.: 1.0000                1st Qu.:1             1st Qu.:1    
##  Median : 1.0000                Median :1             Median :1    
##  Mean   : 0.7836                Mean   :1             Mean   :1    
##  3rd Qu.: 1.0000                3rd Qu.:1             3rd Qu.:1    
##  Max.   : 1.0000                Max.   :1             Max.   :1    
##  87398500 - solidos_totais 87398500 - E_coli 87398500 - ANO_COLETA
##  Min.   :0.4915            Min.   :1         Min.   :-0.3361      
##  1st Qu.:0.8978            1st Qu.:1         1st Qu.: 1.0000      
##  Median :1.0000            Median :1         Median : 1.0000      
##  Mean   :0.8976            Mean   :1         Mean   : 0.8972      
##  3rd Qu.:1.0000            3rd Qu.:1         3rd Qu.: 1.0000      
##  Max.   :1.0000            Max.   :1         Max.   : 1.0000      
##  87398500 - Condutividade 87398900 - DBO   87398900 - nitro_kjeldahl
##  Min.   :1                Min.   :0.3880   Min.   :0.4385           
##  1st Qu.:1                1st Qu.:1.0000   1st Qu.:0.9982           
##  Median :1                Median :1.0000   Median :1.0000           
##  Mean   :1                Mean   :0.9529   Mean   :0.9000           
##  3rd Qu.:1                3rd Qu.:1.0000   3rd Qu.:1.0000           
##  Max.   :1                Max.   :1.0000   Max.   :1.0000           
##  87398900 - nitro_total 87398900 - fosforo_total 87398900 - temp_agua
##  Min.   :0.4067         Min.   :0.3526           Min.   :-0.3893     
##  1st Qu.:0.9982         1st Qu.:0.5279           1st Qu.: 1.0000     
##  Median :1.0000         Median :1.0000           Median : 1.0000     
##  Mean   :0.8647         Mean   :0.8295           Mean   : 0.8931     
##  3rd Qu.:1.0000         3rd Qu.:1.0000           3rd Qu.: 1.0000     
##  Max.   :1.0000         Max.   :1.0000           Max.   : 1.0000     
##  87398900 - turbidez 87398900 - oxigenio_dissolvido 87398900 - nitro_amon
##  Min.   :0.4067      Min.   :-0.3893                Min.   :0.3880       
##  1st Qu.:0.9070      1st Qu.: 1.0000                1st Qu.:0.7489       
##  Median :1.0000      Median : 1.0000                Median :1.0000       
##  Mean   :0.8634      Mean   : 0.8931                Mean   :0.8447       
##  3rd Qu.:1.0000      3rd Qu.: 1.0000                3rd Qu.:1.0000       
##  Max.   :1.0000      Max.   : 1.0000                Max.   :1.0000       
##  87398900 - pH 87398900 - solidos_totais 87398900 - E_coli
##  Min.   :1     Min.   :0.4234            Min.   :1        
##  1st Qu.:1     1st Qu.:0.9070            1st Qu.:1        
##  Median :1     Median :1.0000            Median :1        
##  Mean   :1     Mean   :0.8748            Mean   :1        
##  3rd Qu.:1     3rd Qu.:1.0000            3rd Qu.:1        
##  Max.   :1     Max.   :1.0000            Max.   :1        
##  87398900 - ANO_COLETA 87398900 - Condutividade 87398950 - DBO
##  Min.   :0.3526        Min.   :1                Min.   :1     
##  1st Qu.:1.0000        1st Qu.:1                1st Qu.:1     
##  Median :1.0000        Median :1                Median :1     
##  Mean   :0.9502        Mean   :1                Mean   :1     
##  3rd Qu.:1.0000        3rd Qu.:1                3rd Qu.:1     
##  Max.   :1.0000        Max.   :1                Max.   :1     
##  87398950 - nitro_kjeldahl 87398950 - nitro_total 87398950 - fosforo_total
##  Min.   :-0.5359           Min.   :0.5497         Min.   :0.5497          
##  1st Qu.: 1.0000           1st Qu.:1.0000         1st Qu.:1.0000          
##  Median : 1.0000           Median :1.0000         Median :1.0000          
##  Mean   : 0.8593           Mean   :0.9647         Mean   :0.9307          
##  3rd Qu.: 1.0000           3rd Qu.:1.0000         3rd Qu.:1.0000          
##  Max.   : 1.0000           Max.   :1.0000         Max.   :1.0000          
##  87398950 - temp_agua 87398950 - turbidez 87398950 - oxigenio_dissolvido
##  Min.   :-0.5945      Min.   :0.8455      Min.   :-0.5945               
##  1st Qu.: 1.0000      1st Qu.:1.0000      1st Qu.: 1.0000               
##  Median : 1.0000      Median :1.0000      Median : 1.0000               
##  Mean   : 0.8773      Mean   :0.9881      Mean   : 0.6475               
##  3rd Qu.: 1.0000      3rd Qu.:1.0000      3rd Qu.: 1.0000               
##  Max.   : 1.0000      Max.   :1.0000      Max.   : 1.0000               
##  87398950 - nitro_amon 87398950 - pH 87398950 - solidos_totais
##  Min.   :1             Min.   :1     Min.   :0.8455           
##  1st Qu.:1             1st Qu.:1     1st Qu.:1.0000           
##  Median :1             Median :1     Median :1.0000           
##  Mean   :1             Mean   :1     Mean   :0.9881           
##  3rd Qu.:1             3rd Qu.:1     3rd Qu.:1.0000           
##  Max.   :1             Max.   :1     Max.   :1.0000           
##  87398950 - E_coli 87398950 - ANO_COLETA 87398950 - Condutividade
##  Min.   :1         Min.   :1             Min.   :-0.4515         
##  1st Qu.:1         1st Qu.:1             1st Qu.: 1.0000         
##  Median :1         Median :1             Median : 1.0000         
##  Mean   :1         Mean   :1             Mean   : 0.8318         
##  3rd Qu.:1         3rd Qu.:1             3rd Qu.: 1.0000         
##  Max.   :1         Max.   :1             Max.   : 1.0000         
##  87398980 - DBO 87398980 - nitro_kjeldahl 87398980 - nitro_total
##  Min.   :1      Min.   :1                 Min.   :1             
##  1st Qu.:1      1st Qu.:1                 1st Qu.:1             
##  Median :1      Median :1                 Median :1             
##  Mean   :1      Mean   :1                 Mean   :1             
##  3rd Qu.:1      3rd Qu.:1                 3rd Qu.:1             
##  Max.   :1      Max.   :1                 Max.   :1             
##  87398980 - fosforo_total 87398980 - temp_agua 87398980 - turbidez
##  Min.   :1                Min.   :0.5681       Min.   :0.5681     
##  1st Qu.:1                1st Qu.:1.0000       1st Qu.:1.0000     
##  Median :1                Median :1.0000       Median :1.0000     
##  Mean   :1                Mean   :0.9668       Mean   :0.9402     
##  3rd Qu.:1                3rd Qu.:1.0000       3rd Qu.:1.0000     
##  Max.   :1                Max.   :1.0000       Max.   :1.0000     
##  87398980 - oxigenio_dissolvido 87398980 - nitro_amon 87398980 - pH
##  Min.   :1                      Min.   :1             Min.   :1    
##  1st Qu.:1                      1st Qu.:1             1st Qu.:1    
##  Median :1                      Median :1             Median :1    
##  Mean   :1                      Mean   :1             Mean   :1    
##  3rd Qu.:1                      3rd Qu.:1             3rd Qu.:1    
##  Max.   :1                      Max.   :1             Max.   :1    
##  87398980 - solidos_totais 87398980 - E_coli 87398980 - ANO_COLETA
##  Min.   :0.6547            Min.   :1         Min.   :1            
##  1st Qu.:1.0000            1st Qu.:1         1st Qu.:1            
##  Median :1.0000            Median :1         Median :1            
##  Mean   :0.9734            Mean   :1         Mean   :1            
##  3rd Qu.:1.0000            3rd Qu.:1         3rd Qu.:1            
##  Max.   :1.0000            Max.   :1         Max.   :1            
##  87398980 - Condutividade 87405500 - DBO   87405500 - nitro_kjeldahl
##  Min.   :1                Min.   :0.4199   Min.   :0.3930           
##  1st Qu.:1                1st Qu.:0.5402   1st Qu.:0.6656           
##  Median :1                Median :1.0000   Median :0.9319           
##  Mean   :1                Mean   :0.7900   Mean   :0.8206           
##  3rd Qu.:1                3rd Qu.:1.0000   3rd Qu.:1.0000           
##  Max.   :1                Max.   :1.0000   Max.   :1.0000           
##  87405500 - nitro_total 87405500 - fosforo_total 87405500 - temp_agua
##  Min.   :0.5052         Min.   :-0.3314          Min.   :0.3109      
##  1st Qu.:0.6036         1st Qu.: 0.4828          1st Qu.:0.4534      
##  Median :0.9033         Median : 0.7834          Median :0.5711      
##  Mean   :0.8197         Mean   : 0.6601          Mean   :0.7138      
##  3rd Qu.:1.0000         3rd Qu.: 1.0000          3rd Qu.:1.0000      
##  Max.   :1.0000         Max.   : 1.0000          Max.   :1.0000      
##  87405500 - turbidez 87405500 - oxigenio_dissolvido 87405500 - nitro_amon
##  Min.   :0.3797      Min.   :-0.3314                Min.   :0.4993       
##  1st Qu.:1.0000      1st Qu.: 1.0000                1st Qu.:0.7350       
##  Median :1.0000      Median : 1.0000                Median :0.9033       
##  Mean   :0.9523      Mean   : 0.8976                Mean   :0.8353       
##  3rd Qu.:1.0000      3rd Qu.: 1.0000                3rd Qu.:1.0000       
##  Max.   :1.0000      Max.   : 1.0000                Max.   :1.0000       
##  87405500 - pH    87405500 - solidos_totais 87405500 - E_coli
##  Min.   :0.3109   Min.   :0.3797            Min.   :1        
##  1st Qu.:0.4284   1st Qu.:0.4477            1st Qu.:1        
##  Median :0.5052   Median :0.6036            Median :1        
##  Mean   :0.6886   Mean   :0.6652            Mean   :1        
##  3rd Qu.:1.0000   3rd Qu.:1.0000            3rd Qu.:1        
##  Max.   :1.0000   Max.   :1.0000            Max.   :1        
##  87405500 - ANO_COLETA 87405500 - Condutividade 87406900 - DBO  
##  Min.   :1             Min.   :0.4527           Min.   :0.5144  
##  1st Qu.:1             1st Qu.:0.5737           1st Qu.:0.7408  
##  Median :1             Median :0.8099           Median :1.0000  
##  Mean   :1             Mean   :0.7836           Mean   :0.8530  
##  3rd Qu.:1             3rd Qu.:1.0000           3rd Qu.:1.0000  
##  Max.   :1             Max.   :1.0000           Max.   :1.0000  
##  87406900 - nitro_kjeldahl 87406900 - nitro_total 87406900 - fosforo_total
##  Min.   :-0.5366           Min.   :0.3926         Min.   :-0.3894         
##  1st Qu.: 0.6958           1st Qu.:0.6754         1st Qu.: 0.6154         
##  Median : 0.9305           Median :0.8658         Median : 0.7260         
##  Mean   : 0.7673           Mean   :0.8084         Mean   : 0.6906         
##  3rd Qu.: 1.0000           3rd Qu.:1.0000         3rd Qu.: 1.0000         
##  Max.   : 1.0000           Max.   :1.0000         Max.   : 1.0000         
##  87406900 - temp_agua 87406900 - turbidez 87406900 - oxigenio_dissolvido
##  Min.   :-0.3840      Min.   :-0.4238     Min.   :-0.5366               
##  1st Qu.: 0.4569      1st Qu.: 1.0000     1st Qu.: 1.0000               
##  Median : 0.6015      Median : 1.0000     Median : 1.0000               
##  Mean   : 0.6624      Mean   : 0.8905     Mean   : 0.6685               
##  3rd Qu.: 1.0000      3rd Qu.: 1.0000     3rd Qu.: 1.0000               
##  Max.   : 1.0000      Max.   : 1.0000     Max.   : 1.0000               
##  87406900 - nitro_amon 87406900 - pH    87406900 - solidos_totais
##  Min.   :0.4212        Min.   :0.3926   Min.   :0.4459           
##  1st Qu.:0.7397        1st Qu.:1.0000   1st Qu.:0.6187           
##  Median :0.8658        Median :1.0000   Median :0.6958           
##  Mean   :0.8237        Mean   :0.8628   Mean   :0.7839           
##  3rd Qu.:1.0000        3rd Qu.:1.0000   3rd Qu.:1.0000           
##  Max.   :1.0000        Max.   :1.0000   Max.   :1.0000           
##  87406900 - E_coli 87406900 - ANO_COLETA 87406900 - Condutividade
##  Min.   :1         Min.   :-0.4238       Min.   :0.4024          
##  1st Qu.:1         1st Qu.: 1.0000       1st Qu.:0.6399          
##  Median :1         Median : 1.0000       Median :0.8068          
##  Mean   :1         Mean   : 0.8905       Mean   :0.7870          
##  3rd Qu.:1         3rd Qu.: 1.0000       3rd Qu.:1.0000          
##  Max.   :1         Max.   : 1.0000       Max.   :1.0000          
##  87409900 - DBO   87409900 - nitro_kjeldahl 87409900 - nitro_total
##  Min.   :0.5624   Min.   :0.6898            Min.   :0.5245        
##  1st Qu.:1.0000   1st Qu.:0.9999            1st Qu.:0.8314        
##  Median :1.0000   Median :1.0000            Median :1.0000        
##  Mean   :0.9371   Mean   :0.9603            Mean   :0.8823        
##  3rd Qu.:1.0000   3rd Qu.:1.0000            3rd Qu.:1.0000        
##  Max.   :1.0000   Max.   :1.0000            Max.   :1.0000        
##  87409900 - fosforo_total 87409900 - temp_agua 87409900 - turbidez
##  Min.   :0.4560           Min.   :0.4309       Min.   :0.4405     
##  1st Qu.:0.8175           1st Qu.:1.0000       1st Qu.:1.0000     
##  Median :0.8565           Median :1.0000       Median :1.0000     
##  Mean   :0.8426           Mean   :0.9562       Mean   :0.9570     
##  3rd Qu.:1.0000           3rd Qu.:1.0000       3rd Qu.:1.0000     
##  Max.   :1.0000           Max.   :1.0000       Max.   :1.0000     
##  87409900 - oxigenio_dissolvido 87409900 - nitro_amon 87409900 - pH   
##  Min.   :1                      Min.   :0.7569        Min.   :0.4049  
##  1st Qu.:1                      1st Qu.:0.8915        1st Qu.:1.0000  
##  Median :1                      Median :1.0000        Median :1.0000  
##  Mean   :1                      Mean   :0.9482        Mean   :0.9542  
##  3rd Qu.:1                      3rd Qu.:1.0000        3rd Qu.:1.0000  
##  Max.   :1                      Max.   :1.0000        Max.   :1.0000  
##  87409900 - solidos_totais 87409900 - E_coli 87409900 - ANO_COLETA
##  Min.   :0.4405            Min.   :0.4528    Min.   :0.4528       
##  1st Qu.:0.5429            1st Qu.:0.5245    1st Qu.:1.0000       
##  Median :1.0000            Median :1.0000    Median :1.0000       
##  Mean   :0.8442            Mean   :0.8215    Mean   :0.9579       
##  3rd Qu.:1.0000            3rd Qu.:1.0000    3rd Qu.:1.0000       
##  Max.   :1.0000            Max.   :1.0000    Max.   :1.0000       
##  87409900 - Condutividade
##  Min.   :0.4049          
##  1st Qu.:0.4895          
##  Median :0.7254          
##  Mean   :0.7294          
##  3rd Qu.:1.0000          
##  Max.   :1.0000
parametros_IQA %>% 
  # group_by(CODIGO) %>% 
  dplyr::select(
    nitro_kjeldahl, Condutividade
  ) %>% 
  # correlation::cor_test() %>% 
  plot()

correlação-parametros-qualidade-agua-gravataí no período 1990-2020

str(
  plot(
    correlation::cor_test(
      parametros_IQA,
      "nitro_kjeldahl",
      "Condutividade"
    )
  )
)
## List of 9
##  $ data       : tibble [1,179 × 14] (S3: tbl_df/tbl/data.frame)
##   ..$ CODIGO             : chr [1:1179] "87398950" "87398900" "87405500" "87398950" ...
##   ..$ pH                 : num [1:1179] 6.9 6.8 6.6 6.4 6.9 6.7 6.6 6.7 6.3 7.1 ...
##   ..$ DBO                : num [1:1179] 5 5 11 3 3 2 4 3 4 2 ...
##   ..$ E_coli             : num [1:1179] 4 40 12.8 10.4 32 16.8 40 6.4 10.4 18.4 ...
##   ..$ nitro_amon         : num [1:1179] NA NA NA NA NA NA NA NA NA NA ...
##   ..$ nitro_kjeldahl     : num [1:1179] 1.42 1.61 6.62 0.79 1.45 0.76 1.23 1.37 2.25 1.34 ...
##   ..$ nitro_total        : num [1:1179] 1.42 1.61 6.62 0.79 1.45 0.76 1.23 1.37 2.25 1.34 ...
##   ..$ fosforo_total      : num [1:1179] 0.113 0.0883 0.353 0.0908 0.118 0.0326 0.162 0.138 0.217 0.0879 ...
##   ..$ temp_agua          : num [1:1179] 25 31 31 20 28 16 16 16 18.5 28 ...
##   ..$ turbidez           : num [1:1179] 20 20 8.5 23 19 17 12 22 17 23 ...
##   ..$ solidos_totais     : num [1:1179] 121 112 160 93 127 75 80 201 84 123 ...
##   ..$ oxigenio_dissolvido: num [1:1179] 6.5 8.7 5.3 7.8 7.6 8.5 7.3 6.9 6.7 6.3 ...
##   ..$ Condutividade      : num [1:1179] 90 47 147 43 NA 47 70 60.6 72.7 56 ...
##   ..$ ANO_COLETA         : num [1:1179] 1994 1994 1994 1993 1994 ...
##  $ layers     :List of 2
##   ..$ :Classes 'LayerInstance', 'Layer', 'ggproto', 'gg' <ggproto object: Class LayerInstance, Layer, gg>
##     aes_params: list
##     compute_aesthetics: function
##     compute_geom_1: function
##     compute_geom_2: function
##     compute_position: function
##     compute_statistic: function
##     computed_geom_params: NULL
##     computed_mapping: NULL
##     computed_stat_params: NULL
##     constructor: call
##     data: waiver
##     draw_geom: function
##     finish_statistics: function
##     geom: <ggproto object: Class GeomSmooth, Geom, gg>
##         aesthetics: function
##         default_aes: uneval
##         draw_group: function
##         draw_key: function
##         draw_layer: function
##         draw_panel: function
##         extra_params: na.rm orientation
##         handle_na: function
##         non_missing_aes: 
##         optional_aes: ymin ymax
##         parameters: function
##         rename_size: TRUE
##         required_aes: x y
##         setup_data: function
##         setup_params: function
##         use_defaults: function
##         super:  <ggproto object: Class Geom, gg>
##     geom_params: list
##     inherit.aes: TRUE
##     layer_data: function
##     map_statistic: function
##     mapping: uneval
##     position: <ggproto object: Class PositionIdentity, Position, gg>
##         compute_layer: function
##         compute_panel: function
##         required_aes: 
##         setup_data: function
##         setup_params: function
##         super:  <ggproto object: Class Position, gg>
##     print: function
##     setup_layer: function
##     show.legend: NA
##     stat: <ggproto object: Class StatSmooth, Stat, gg>
##         aesthetics: function
##         compute_group: function
##         compute_layer: function
##         compute_panel: function
##         default_aes: uneval
##         dropped_aes: 
##         extra_params: na.rm orientation
##         finish_layer: function
##         non_missing_aes: 
##         optional_aes: 
##         parameters: function
##         required_aes: x y
##         retransform: TRUE
##         setup_data: function
##         setup_params: function
##         super:  <ggproto object: Class Stat, gg>
##     stat_params: list
##     super:  <ggproto object: Class Layer, gg> 
##   ..$ :Classes 'LayerInstance', 'Layer', 'ggproto', 'gg' <ggproto object: Class LayerInstance, Layer, gg>
##     aes_params: list
##     compute_aesthetics: function
##     compute_geom_1: function
##     compute_geom_2: function
##     compute_position: function
##     compute_statistic: function
##     computed_geom_params: NULL
##     computed_mapping: NULL
##     computed_stat_params: NULL
##     constructor: call
##     data: tbl_df, tbl, data.frame
##     draw_geom: function
##     finish_statistics: function
##     geom: <ggproto object: Class GeomPoint, Geom, gg>
##         aesthetics: function
##         default_aes: uneval
##         draw_group: function
##         draw_key: function
##         draw_layer: function
##         draw_panel: function
##         extra_params: na.rm
##         handle_na: function
##         non_missing_aes: size shape colour
##         optional_aes: 
##         parameters: function
##         rename_size: FALSE
##         required_aes: x y
##         setup_data: function
##         setup_params: function
##         use_defaults: function
##         super:  <ggproto object: Class Geom, gg>
##     geom_params: list
##     inherit.aes: TRUE
##     layer_data: function
##     map_statistic: function
##     mapping: uneval
##     position: <ggproto object: Class PositionIdentity, Position, gg>
##         compute_layer: function
##         compute_panel: function
##         required_aes: 
##         setup_data: function
##         setup_params: function
##         super:  <ggproto object: Class Position, gg>
##     print: function
##     setup_layer: function
##     show.legend: NA
##     stat: <ggproto object: Class StatIdentity, Stat, gg>
##         aesthetics: function
##         compute_group: function
##         compute_layer: function
##         compute_panel: function
##         default_aes: uneval
##         dropped_aes: 
##         extra_params: na.rm
##         finish_layer: function
##         non_missing_aes: 
##         optional_aes: 
##         parameters: function
##         required_aes: 
##         retransform: TRUE
##         setup_data: function
##         setup_params: function
##         super:  <ggproto object: Class Stat, gg>
##     stat_params: list
##     super:  <ggproto object: Class Layer, gg> 
##  $ scales     :Classes 'ScalesList', 'ggproto', 'gg' <ggproto object: Class ScalesList, gg>
##     add: function
##     clone: function
##     find: function
##     get_scales: function
##     has_scale: function
##     input: function
##     n: function
##     non_position_scales: function
##     scales: list
##     super:  <ggproto object: Class ScalesList, gg> 
##  $ mapping    : Named list()
##   ..- attr(*, "class")= chr "uneval"
##  $ theme      : list()
##  $ coordinates:Classes 'CoordCartesian', 'Coord', 'ggproto', 'gg' <ggproto object: Class CoordCartesian, Coord, gg>
##     aspect: function
##     backtransform_range: function
##     clip: on
##     default: TRUE
##     distance: function
##     expand: TRUE
##     is_free: function
##     is_linear: function
##     labels: function
##     limits: list
##     modify_scales: function
##     range: function
##     render_axis_h: function
##     render_axis_v: function
##     render_bg: function
##     render_fg: function
##     setup_data: function
##     setup_layout: function
##     setup_panel_guides: function
##     setup_panel_params: function
##     setup_params: function
##     train_panel_guides: function
##     transform: function
##     super:  <ggproto object: Class CoordCartesian, Coord, gg> 
##  $ facet      :Classes 'FacetNull', 'Facet', 'ggproto', 'gg' <ggproto object: Class FacetNull, Facet, gg>
##     compute_layout: function
##     draw_back: function
##     draw_front: function
##     draw_labels: function
##     draw_panels: function
##     finish_data: function
##     init_scales: function
##     map_data: function
##     params: list
##     setup_data: function
##     setup_params: function
##     shrink: TRUE
##     train_scales: function
##     vars: function
##     super:  <ggproto object: Class FacetNull, Facet, gg> 
##  $ plot_env   :<environment: 0x000002a8deaab9d0> 
##  $ labels     :List of 4
##   ..$ title   : NULL
##   ..$ subtitle: chr "r = 0.83, 95% CI [0.81, 0.86], t(605) = 36.90, p < .001"
##   ..$ x       : chr "nitro_kjeldahl"
##   ..$ y       : chr "Condutividade"
##  - attr(*, "class")= chr [1:2] "gg" "ggplot"

Time for this code chunk to run: 5.23260879516602

9.1.2 Condutividade elétrica

(cond_elet <- ggplot(plan_wide_19902020,
                        aes(CODIGO,
                            Condutividade))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=500,
            ymax=Inf,
            alpha=1,
            fill="#eb5661")+ #classe 4
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=-Inf,
            ymax=500,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   facet_wrap(~periodo)+
      labs(title = "Condutividade elétrica no período 1990-2020",
        x="Estação",
        y="µmhos/cm")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.05)),
                      n.breaks = 8,
                      limits = c(0,
                                 max(plan_wide_19902020$Condutividade, na.rm = TRUE)),
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

condutividade-eletrica-gravataí no período 1990-2020Time for this code chunk to run: 2.45411801338196

(cond_elet_p1 <- ggplot(plan_wide_19902020 %>% 
                          filter(ANO_COLETA>"2000" &
                                   ANO_COLETA<="2010"),
                        aes(CODIGO,
                            Condutividade))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=500,
            ymax=Inf,
            alpha=1,
            fill="#eb5661")+ #classe 4
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=-Inf,
            ymax=500,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
      labs(title = "Condutividade elétrica no período 1990-2000",
        x="Estação",
        y="µmhos/cm")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.05)),
                      n.breaks = 8,
                      limits = c(0,
                                 max(plan_wide_19902020$Condutividade, na.rm = TRUE)),
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

Time for this code chunk to run: 1.77619791030884

(cond_elet_p2 <- ggplot(plan_wide_19902020 %>% 
                          filter(ANO_COLETA>"2000" &
                                   ANO_COLETA<="2010"),
                        aes(CODIGO,
                            Condutividade))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=500,
            ymax=Inf,
            alpha=1,
            fill="#eb5661")+ #classe 4
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=-Inf,
            ymax=500,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   labs(title = "Condutividade elétrica no período 2000-2010",
        x="Estação",
        y="µmhos/cm")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.05)),
                      n.breaks = 8,
                      limits = c(0,
                                 max(plan_wide_19902020$Condutividade, na.rm = TRUE)),
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

Time for this code chunk to run: 1.65006995201111

(cond_elet_p3 <- ggplot(plan_wide_19902020 %>% 
                          filter(ANO_COLETA>"2010" &
                                   ANO_COLETA<="2020"),
                        aes(CODIGO,
                            Condutividade))+
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=500,
            ymax=Inf,
            alpha=1,
            fill="#eb5661")+ #classe 4
   annotate("rect",
            xmin=-Inf,
            xmax=Inf,
            ymin=-Inf,
            ymax=500,
            alpha=1,
            fill="#8dcdeb")+ #classe 1
   stat_boxplot(geom = 'errorbar',
                width=0.3,
                position = position_dodge(width = 0.65))+
   geom_boxplot(fill='#F8F8FF',
                color="black",
                outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
                width= 0.7)+
   labs(title = "Condutividade elétrica no período 2010-2020",
        x="Estação",
        y="µmhos/cm")+
   scale_y_continuous(expand = expansion(mult = c(0.01, 0.05)),
                      n.breaks = 8,
                      limits = c(0,
                                 max(plan_wide_19902020$Condutividade, na.rm = TRUE)),
                      labels = scales::number_format(accuracy = 1,
                                                     decimal.mark = ",",
                                                     big.mark = " "))+
    ggbeeswarm::geom_quasirandom(
     size = 1.2,
     alpha = .25,
     width = .07,
   )+
   scale_x_discrete(limits = c("87398500", 
                               "87398980", 
                               "87398900", 
                               "87398950", 
                               "87405500", 
                               "87406900", 
                               "87409900"),
                    labels = c("PM1", "PM2", "PM3", "PM4", "PM5", "PM6", "PM7")
   )+
   geom_smooth(method = "lm",
               se=FALSE, #se deixar TRUE gera o intervalo de confiança de 95%
               aes(group=1),
               alpha=.5,
               na.rm = TRUE,
               size = 1)+
   theme_grafs()
)

Time for this code chunk to run: 1.22569513320923

grid.arrange(cond_elet_p1, cond_elet_p2, cond_elet_p3, ncol = 3)

Time for this code chunk to run: 2.51137900352478

(sum_cond_elet_p1 <- plan_wide_19902020 %>%
   select(CODIGO, Condutividade, ANO_COLETA) %>% 
   filter(ANO_COLETA>"1990" &
            ANO_COLETA<="2000") %>% 
   group_by(CODIGO) %>% 
   summarize(
     min = 
       min(Condutividade, 
           na.rm = TRUE),
     q1 = 
       quantile(Condutividade, 0.25, 
                na.rm = TRUE),
     median = 
       median(Condutividade, 
              na.rm = TRUE),
     mean = 
       mean(Condutividade, 
            na.rm= TRUE),
     q3 = 
       quantile(Condutividade, 0.75, 
                na.rm = TRUE),
     max = 
       max(Condutividade, 
           na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500   9.4  51.1   67    75.1  83.2 340  
## 2 87398900  10    41.5   51    55.3  64.2 160  
## 3 87398950   9    41.5   51.5  60.1  69.5 160  
## 4 87398980  11.3  42.4   52.0  53.0  67.0  83.8
## 5 87405500  25    68.7   88.2 130.  170   560  
## 6 87406900  52    88.4  133.  193.  256.  576  
## 7 87409900  29    80    110.  134.  168.  460
(sum_cond_elet_p2 <- plan_wide_19902020 %>%
    select(CODIGO, Condutividade, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2000" &
             ANO_COLETA<="2010") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(Condutividade, 
            na.rm = TRUE),
      q1 = 
        quantile(Condutividade, 0.25, 
                 na.rm = TRUE),
      median = 
        median(Condutividade, 
               na.rm = TRUE),
      mean = 
        mean(Condutividade, 
             na.rm= TRUE),
      q3 = 
        quantile(Condutividade, 0.75, 
                 na.rm = TRUE),
      max = 
        max(Condutividade, 
            na.rm = TRUE))
)
## # A tibble: 7 × 7
##   CODIGO     min    q1 median  mean    q3   max
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>
## 1 87398500  11.9  67.0   82.6  84.8 102.   164.
## 2 87398900  11    44.4   52.3  57.1  72.6  136.
## 3 87398950  39.8  58.4   76    82.3  98.3  160 
## 4 87398980   9.4  42.4   49.7  51.5  62    114.
## 5 87405500  17    77.5  107   142.  171.   679 
## 6 87406900  23.1  85.6  124.  164.  199.   619 
## 7 87409900  56.1 114.   177   200.  242    454
(sum_cond_elet_p3 <- plan_wide_19902020 %>%
    select(CODIGO, Condutividade, ANO_COLETA) %>% 
    filter(ANO_COLETA>"2010" &
             ANO_COLETA<="2020") %>% 
    group_by(CODIGO) %>% 
    summarize(
      min = 
        min(Condutividade, 
            na.rm = TRUE),
      q1 = 
        quantile(Condutividade, 0.25, 
                 na.rm = TRUE),
      median = 
        median(Condutividade, 
               na.rm = TRUE),
      mean = 
        mean(Condutividade, 
             na.rm= TRUE),
      q3 = 
        quantile(Condutividade, 0.75, 
                 na.rm = TRUE),
      max = 
        max(Condutividade, 
            na.rm = TRUE),
      n = 
        length(Condutividade))
)
## # A tibble: 7 × 8
##   CODIGO     min    q1 median  mean    q3   max     n
##   <chr>    <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl> <int>
## 1 87398500  0.01  68.5   80.2  80.4  99.5 125.     34
## 2 87398900 39.7   53.4   58.3  61.1  65.5 103      36
## 3 87398950 40.9   64.7   70.1  76.1  82.5 195.     35
## 4 87398980 43.2   51.7   54.0  56.3  61.0  78.9    28
## 5 87405500 47     85.8  121.  146.  209.  286      33
## 6 87406900 62.7   95.9  142.  163.  216.  354.     35
## 7 87409900 65.7  121.   159.  179.  245.  498.     37
# plan_wide_19902020 %>% 
#    select(CODIGO, IQA) %>% 
#    group_by(CODIGO) %>% 
#    summarize(
#       min = 
#          min(IQA, 
#              na.rm = TRUE),
#       q1 = 
#          quantile(IQA, 0.25, 
#                   na.rm = TRUE),
#       median = 
#          median(IQA, 
#                 na.rm = TRUE),
#       mean = 
#          mean(IQA, 
#               na.rm= TRUE),
#       q3 = 
#          quantile(IQA, 0.75, 
#                   na.rm = TRUE),
#       max = 
#          max(IQA, 
#              na.rm = TRUE))

Time for this code chunk to run: 0.299726963043213

ggsave("cond_elet.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = cond_elet,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("cond_elet_p1.png",
       plot = cond_elet_p1,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("cond_elet_p2.png",
       plot = cond_elet_p2,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("cond_elet_p3.png",
       plot = cond_elet_p3,
       path = "./graficos",
       dpi = 300,
       type = "cairo")

ggsave("cond_elet_3periodos.png",
       units = c("px"),
       width = 4500,
       height = 2993,
       plot = grid.arrange(cond_elet_p1, cond_elet_p2, cond_elet_p3, ncol = 3),
       path = "./graficos",
       dpi = 300,
       type = "cairo")

Time for this code chunk to run: 8.21060585975647

9.2 Textando o texto

  • § falar do comportamento geral dos dados
  • 2º § - xº § -> abordar os principais parâmetros que estão sendo impactados, detalhando, nas estações mais relevantes, como ficaram os quartis/mediana etc.

10.8

Os resultados apontam que para o parâmetro OD

(boxplot_example <- data.frame(
  PM = c("PM1"),
  # letras = letters[seq( from = 1, to = 1 )],
  Stat1 = rnorm(100, 
                mean=5, 
                sd=3)
) %>% 
  ggplot(
    aes(
      x = PM,
      y = Stat1,
    )
  )+
  annotate("rect",
           xmin = -Inf, xmax = Inf,
           ymin = -Inf, ymax = 2,
           alpha = 1,
           fill = "#ac5079")+ #>pior classe
  annotate("rect",
           xmin = -Inf, xmax = Inf,
           ymin = 2, ymax = 4,
           alpha = 1,
           fill = "#eb5661")+ #classe 4
  annotate("rect",
           xmin = -Inf, xmax = Inf,
           ymin = 4, ymax = 5,
           alpha = 1,
           fill = "#fcf7ab")+ #classe 3
  annotate("rect",
           xmin = -Inf, xmax = Inf,
           ymin = 5, ymax = 6,
           alpha = 1,
           fill = "#70c18c")+ #classe 2
  annotate("rect",
           xmin = -Inf, xmax = Inf,
           ymin= 6, ymax = Inf,
           alpha = 1,
           fill = "#8dcdeb")+ #classe 1
  stat_summary(
    fun.data = f,
    geom = 'errorbar',
    width = 0.15,
    position = position_dodge(width = 0.65),
  )+
  stat_summary(
    fun.data = f,
    geom = "boxplot",
    width = 0.40,
    fill = '#F8F8FF',
    color = "black",
    outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
  )+
labs(
  title = "Elementos do *boxplot*",
  x= NULL,
  y= NULL
)+
  ggbeeswarm::geom_quasirandom(
    size = 1.2,
    alpha = .25,
    width = .07,
  )+
  scale_y_continuous(
    expand = expansion(mult = c(0,0)),
    n.breaks = 8,
    limits = c(-0.3,14)
  )+
theme_grafs()+
  theme(
    plot.title = 
      element_markdown(
        hjust = 0.5,
        color = "black",
        size = 19),
  )
)
## Warning: Removed 3 rows containing non-finite values (`stat_summary()`).
## Removed 3 rows containing non-finite values (`stat_summary()`).
## Warning: Removed 3 rows containing missing values.

Time for this code chunk to run: 0.488339900970459

set.seed(2021)

data <- tibble(
  grupo = factor(
    c(rep(
      "Grupo 1", 100), 
      rep("Grupo 2", 250), 
      rep("Grupo 3", 25)
    )
  ),
  valor = c(seq(0, 20, length.out = 100),
            c(rep(0, 5), 
              rnorm(30, 2, .1), 
              rnorm(90, 5.4, .1), 
              rnorm(90, 14.6, .1), 
              rnorm(30, 18, .1), 
              rep(20, 5)
            ),
            rep(seq(0, 20, length.out = 5), 5))
) %>% 
  rowwise() %>%
  mutate(
    valor = if_else(
      grupo == "Grupo 2", valor + rnorm(1, 0, .4), 
      valor
      )
    )

## function to return median and labels
n_fun <- function(x){
  return(
    data.frame(
      y = median(x) - 1.25, 
      label = paste0(
        "n = ",length(x)
      )
    )
  )
}

Time for this code chunk to run: 0.0371270179748535

(tukey_n_boxplot <- ggplot(data, 
                           aes(x = grupo, 
                               y = valor)
)+
  stat_boxplot(geom = 'errorbar',
               width = 0.15,
               position = position_dodge(width = 0.65))+
  geom_boxplot(fill = "grey92",
               width = 0.40,
               position = position_dodge(width = 0.65))+
  ## use summary function to add text labels
  stat_summary(
    geom = "text",
    fun.data = n_fun,
    family = "Oswald",
    size = 5
  )+
  labs(
    title = "Tukey *boxplot*",
    x= NULL,
    # y="mg/L"
  )+
  # theme_grafs()+
  theme_bw()+
  theme(
    axis.text.y = element_text(
      angle = 90, 
      # size=15,
      # face=2
    ),
    plot.title = 
      element_markdown(
        hjust = 0.5,
        color = "black",
        size = 19)
  )
)
## Warning in grid.Call.graphics(C_text, as.graphicsAnnot(x$label), x$x, x$y, :
## font family not found in Windows font database

(tukey_boxplot <- ggplot(data, aes(x = grupo, 
                                   y = valor)) +
  stat_boxplot(geom = 'errorbar',
               width = 0.15,
               position = position_dodge(width = 0.65))+
  geom_boxplot(fill = "grey92",
               width = 0.40,
               position = position_dodge(width = 0.65)) +
  ## use either geom_point() or geom_jitter()
  geom_point(
    ## draw bigger points
    size = 2,
    ## add some transparency
    alpha = .25,
    ## add some jittering
    position = position_jitter(
      ## control randomness and range of jitter
      seed = 1, width = .2
    )
  )+
  theme_bw()+
  labs(
      title = "Tukey *boxplot*",
      x= NULL,
      # y="mg/L"
    )+
  # theme_grafs()+
  theme_bw()+
  theme(
        axis.text.y = element_text(
          angle = 90, 
          # size=15,
          # face=2
        ),
        plot.title = 
          element_markdown(
            hjust = 0.5,
            color = "black",
            size = 19)
    ))

Time for this code chunk to run: 0.789608955383301

data %>% 
  group_by(grupo) %>% 
  summarize(
    min = min(valor),
    P20 = quantile(valor, 0.20),
    q1 = quantile(valor, 0.25),
    mediana = median(valor),
    q3 = quantile(valor, 0.75),
    P80 = quantile(valor, 0.80),
    max = max(valor)
  ) %>% 
  t() %>% 
  row_to_names(row_number = 1)
##         Grupo 1      Grupo 2      Grupo 3     
## min     " 0.0000000" "-0.6345142" " 0.0000000"
## P20     "4.000000"   "5.057189"   "4.000000"  
## q1      "5.000000"   "5.245691"   "5.000000"  
## mediana "10.00000"   "10.01593"   "10.00000"  
## q3      "15.00000"   "14.81205"   "15.00000"  
## P80     "16.00000"   "15.04351"   "16.00000"  
## max     "20.0000"    "20.3882"    "20.0000"
(box_percentile_plot <- ggplot(data, 
       aes(x = grupo, y = valor)
       ) +
      stat_summary(
        fun.data = f,
        geom = 'errorbar',
        width = 0.15,
        position = position_dodge(width = 0.65),
      )+
      stat_summary(
        fun.data = f,
        geom = "boxplot",
        width = 0.40,
        fill = 'grey92',
        color = "black",
        outlier.shape = NA, #se deixar NA fica só o jitter, se não, deixa 1
      )+
  # geom_boxplot(fill = "grey92") +
  ## use either geom_point() or geom_jitter()
  geom_point(
    ## draw bigger points
    size = 2,
    ## add some transparency
    alpha = .25,
    ## add some jittering
    position = position_jitter(
      ## control randomness and range of jitter
      seed = 1, width = .2
    )
  )+
  labs(
      title = "*Box Percentile-Plot*",
      x= NULL,
      # y="mg/L"
    )+
  # theme_grafs()+
  theme_bw()+
  theme(
        axis.text.y = element_text(
          angle = 90, 
          # size = 15,
          # face = 2
        ),
        plot.title = 
          element_markdown(
            hjust = 0.5,
            color = "black",
            size = 19)
    )
  )

grid.arrange(
  tukey_boxplot, box_percentile_plot, 
  ncol = 2
  )

fig_tukey_garrett <- plot_grid(tukey_boxplot, box_percentile_plot, 
                               labels = "AUTO")

Time for this code chunk to run: 1.51265001296997

ggsave(
  filename = "tukey_n_boxplot.png",
  plot = tukey_n_boxplot,
  units = c("px"),
  width = 4500,
  height = 2993,
  path = "./graficos",
  dpi = 300,
  # type = "cairo"
)
## Warning in grid.Call.graphics(C_text, as.graphicsAnnot(x$label), x$x, x$y, :
## font family not found in Windows font database
ggsave(
  filename = "tukey_boxplot.png",
  plot = tukey_boxplot,
  units = c("px"),
  width = 4500,
  height = 2993,
  path = "./graficos",
  dpi = 300,
  # type = "cairo"
)

ggsave(
  filename = "box_percentile_plot.png",
  plot = box_percentile_plot,
  units = c("px"),
  width = 4500,
  height = 2993,
  path = "./graficos",
  dpi = 300,
  # type = "cairo"
)

ggsave(
  filename = "fig_tukey_garrett.png",
  plot = fig_tukey_garrett,
  units = c("px"),
  width = 4500,
  height = 2993,
  path = "./graficos",
  dpi = 300,
  # type = "cairo"
)

Time for this code chunk to run: 2.96358919143677

LS0tDQp0aXRsZTogIlRDQyINCmF1dGhvcjogIkxlb25hcmRvIEZlcm5hbmRlcyBXaW5rIg0KZGF0ZTogImByIGZvcm1hdChTeXMudGltZSgpLCAnJWQvJW0vJVknKWAiDQpvdXRwdXQ6DQogIGh0bWxfZG9jdW1lbnQ6IA0KICAgIGRpc3RpbGw6OmRpc3RpbGxfYXJ0aWNsZToNCiAgICBoaWdobGlnaHQ6IGhhZGRvY2sNCiAgICBrZWVwX21kOiB5ZXMNCiAgICBudW1iZXJfc2VjdGlvbnM6IHllcw0KICAgIHRoZW1lOiBmbGF0bHkNCiAgICB0b2M6IHllcw0KICAgIHRvY19mbG9hdDoNCiAgICAgIGNvbGxhcHNlZDogbm8NCiAgICAgIHNtb290aF9zY3JvbGw6IG5vDQogICAgZmlnX3dpZHRoOiAxMA0KICAgIGZpZ19oZWlnaHQ6IDYuNjYNCiAgICBmaWdfY2FwdGlvbjogeWVzDQogICAgY29kZV9kb3dubG9hZDogdHJ1ZQ0KICBwZGZfZG9jdW1lbnQ6DQogICAgdG9jOiB5ZXMNCiAgd29yZF9kb2N1bWVudDogDQogICAgdG9jOiB5ZXMNCiAgICBrZWVwX21kOiB5ZXMNCiAgZ2l0aHViX2RvY3VtZW50Og0KICAgIGh0bWxfcHJldmlldzogdHJ1ZQ0KYWx3YXlzX2FsbG93X2h0bWw6IHllcw0KZWRpdG9yX29wdGlvbnM6IA0KICBjaHVua19vdXRwdXRfdHlwZTogY29uc29sZQ0KZmlnLmFsaWduOiBjZW50ZXINCi0tLQ0KDQpgYGB7ciBSb3RpbmEgcHJhIHRvZGEgdmV6IHF1ZSBhYnJpciBvIGRvY3VtZW50bywgZWNobyA9IEZBTFNFfQ0KIyBBYnJpciBvIEdpdEh1YiBEZXNrdG9wDQojIFZlcmlmaWNhciBzZSBow6EgcHVsbCBwcmEgc2VyIGZlaXRvDQojIEFicmlyIG8gUlN0dWRpbw0KYGBgDQoNCiMgQnJpZWYgZXhwbGFuYXRpb24NCg0KRXZlcnkgYm94cGxvdCBtZWFucyBhIG1vbml0b3JpbmcgcG9pbnQgKFBvbnRvIGRlIG1vbml0b3JhbWVudG8gKG9yIFBNKSBpbiBwb3J0dWd1ZXNlKS4gTXkgZ29hbCBoZXJlIGlzIHRvIGFuYWx5emUgdGhlIGV2b2x1dGlvbiBiZXR3ZWVuIGRlY2FkZXMgb2YgZWFjaCB3YXRlciBxdWFsaXR5IHBhcmFtZXRlciB0aGF0IGNvbXBvdW5kcyB0aGUgV2F0ZXIgUXVhbGl0eSBJbmRleCAoV1FJKS4NCg0KVGhlIHJpdmVyIGZsb3dzIGluIHRoZSBlYXN0LXdlc3QgZGlyZWN0aW9uIGFzIHNob3duIGluIHRoZSBpbWFnZSBiZWxvdy4NCg0KIVtdKGltYWdlcy9wYXN0ZS03QUQ3MDI3Ri5wbmcpDQoNClRoZSBsb2dpYyBiZWhpbmQgdGhlIHNvcnRpbmcgaW4gdGhlIGJveHBsb3RzIGlzIGJlY2F1c2Ugb2YgMiBtYWluIHJlYXNvbnM6DQoNCjEuICBUaGUgb3JpZ2luYWwgbW9uaXRvcmluZyBwb2ludCBpc24ndCBlYXN5IHRvIHVuZGVyc3RhbmQgKDggZGlnaXRzLCBsaWtlIDg3NDA5OTAwKQ0KMi4gIENoYW5naW5nIHRoZSBvcmlnaW5hbCBub21lbmNsYXR1cmUgdG8gUE0xLCBQTTIgKC4uLikgbWFrZXMgaXQgZWFzaWVyIHRvIHVuZGVyc3RhbmQgdGhhdCB0aGUgbGFzdCBwb2ludCBoYXMgd2F0ZXIgY29udHJpYnV0aW9ucyBvZiBldmVyeSBvdGhlciBwb2ludCB1cHN0cmVhbS4NCg0KU29tZSBmZWF0dXJlcyB0aGF0IEkgd2FudCB0byBhZGQ6IC0gSWYgdGhlIHBhcmFtZXRlciBpcyB4LCB0aGVuIHVzZSB4J3MgY2xhc3NlcyAod2l0aCBpdHMgb3duIGNsYXNzZXMgYmFja2dyb3VuZCBjb2xvciBwbG90dGVkKSAtIERlZmluZSB0aGUgdGltZXNjYWxlLCBzaG91bGQgYWN0IGp1c3QgbGlrZSBhIGZpbHRlcg0KDQpgYGB7ciBwMSBleGFtcGxlLCBldmFsPUZBTFNFfQ0KIyBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQojICAgZmlsdGVyKEFOT19DT0xFVEEgPiAiMTk5MCIgJg0KIyAgICAgICAgICBBTk9fQ09MRVRBIDw9ICIyMDAwIikNCmBgYA0KDQojIEFub3Rhw6fDtWVzIGRlIGNvaXNhcyBwb3IgZmF6ZXI6DQoNCi0gICBEZXNjb2JyaXIgY29tbyBjb2xvY2FyIGFzIGVzdGHDp8O1ZXMgbm8gc2VudGlkbyBjb3JyZXRvIG1vbnRhbnRlIC1cPiBqdXNhbnRlIG5vcyBzdW3DoXJpb3MNCg0KPiA4NzM5ODUwMCwgODczOTg5ODAsIDg3Mzk4OTAwLCA4NzM5ODk1MCwgODc0MDU1MDAsIDg3NDA2OTAwLCA4NzQwOTkwMA0KDQotICAgfn5BcHJlbmRlciBhIHNlZ21lbnRhciBvIG1ldSBkYXRhc2V0IHBvciBwZXLDrW9kb3N+fg0KLSAgIGFwcmVuZGVyIGEgY3JpYXIgdW1hIG5vdmEgY29sdW5hIGNvbSBhIHNlZ21lbnRhw6fDo28gZG9zIHBlcsOtb2Rvcw0KLSAgIG1heWJlIHVzZSBgfmZhY2V0LmdyaWRgDQotICAgYXByZW5kZXIgYSBjb2xvY2FyIGEgbGVnZW5kYSBkZW50cm8gZG8gZ3LDoWZpY28NCiAgICAtICAgcmVkdXppciBvIHRhbWFuaG8gZGEgbGVnZW5kYQ0KLSAgIH5+Y29ycmlnaXIgb3MgdmFsb3JlcyAwIGRlIElRQSBwcmEgTkF+fg0KLSAgIGRlc2NvYnJpciBjb21vIGNvbnNlZ3VpciBhIGVxdWHDp8OjbyBkbyBsbQ0KLSAgIH5+YXByZW5kZXIgYSBwaXZvdGFyIG8gc3Vtw6FyaW9+fiAtXD4gbWV1IHN1bcOhcmlvIGRvIGdvb2dsZSBkb2NzIHRhIGJhdGVuZG8gZGlyZWl0aW5obyBjb20gbyBkbyBSDQotICAgZGVzY29icmlyIHNlIGjDoSBvdXRyb3MgVENDcyBjb20gZGlzcG9uaWJpbGl6YcOnw6NvIGRlIGPDs2RpZ29zDQotICAgfn5gTmFtb25gIHTDoSBjb20gY29tIGNhc2EgZGVjaW1hbCBgIiwiYCBlIGBwdG90YCB0w6EgY29tIGAiLiJgfn4NCi0gICBjb3JyZWxhw6fDo28gZm9ydGUgZW50cmUgY29uZHV0aXZpZGFkZSBlIE5hbW9uL1B0b3QvREJPDQoNCnwgMTk5MC0yMDAwIHwgMjAwMC0yMDEwIHwgMjAxMC0yMDIwIHwNCnw6LS0tLS0tLS0tOnw6LS0tLS0tLS0tOnw6LS0tLS0tLS0tOnwNCnwgMTk5MC0yMDAwIHwgMjAwMC0yMDEwIHwgMjAxMC0yMDIwIHwNCg0KIyBJbnN0YWxhciBvcyBwYWNvdGVzDQoNCmBgYHtyIGluc3RhbGFyIHBhY290ZXMsIGV2YWw9RkFMU0V9DQojIGluc3RhbGwucGFja2FnZXModGlkeXZlcnNlKQ0KYGBgDQoNCiMjIGFjZXNzYXIgb3MgcGFjb3Rlcw0KDQpgYGB7ciBBY2Vzc2FyIG9zIHBhY290ZXMsIG1lc3NhZ2UgPSBGQUxTRSwgd2FybmluZyA9IFRSVUV9DQojIGxpYnJhcnkoZ2dwdWJyKQ0KcGFjbWFuOjpwX2xvYWQocmVhZHIsIHJtYXJrZG93biwgcmVhZHhsLCBqYW5pdG9yLA0KICAgICAgICAgICAgICAgcGlsbGFyLCBkcGx5ciwgdGlkeXZlcnNlLA0KICAgICAgICAgICAgICAgIyBnYXBtaW5kZXIsIA0KICAgICAgICAgICAgICAga25pdHIsIGthYmxlRXh0cmEsIHNlZSwNCiAgICAgICAgICAgICAgIGdyaWRFeHRyYSwgI21vZGVsc3VtbWFyeSwgDQogICAgICAgICAgICAgICBndHN1bW1hcnksIGdncGxvdDIsDQogICAgICAgICAgICAgICBnZ2JlZXN3YXJtLCBHR2FsbHksIGdndGV4dCwgY293cGxvdCwNCiAgICAgICAgICAgICAgIHJlcG9ydCkNCiMgcGFjbWFuOjpwX2xvYWQodGliYmxldGltZSkNCiMgY2l0ZV9wYWNrYWdlcygpDQpgYGANCg0KYGBge3IgY3Jvbm9tZXRyYW5kbyBxdWFudG8gdGVtcG8gY2FkYSBjaHVuayBsZXZhfQ0Ka25pdHI6OmtuaXRfaG9va3Mkc2V0KHRpbWVfaXQgPSBsb2NhbCh7DQogICBub3cgPC0gTlVMTA0KICAgZnVuY3Rpb24oYmVmb3JlLCBvcHRpb25zKSB7DQogICAgICBpZiAoYmVmb3JlKSB7DQogICAgICAgICAjIHJlY29yZCB0aGUgY3VycmVudCB0aW1lIGJlZm9yZSBlYWNoIGNodW5rDQogICAgICAgICBub3cgPDwtIFN5cy50aW1lKCkNCiAgICAgIH0gZWxzZSB7DQogICAgICAgICAjIGNhbGN1bGF0ZSB0aGUgdGltZSBkaWZmZXJlbmNlIGFmdGVyIGEgY2h1bmsNCiAgICAgICAgIHJlcyA8LSBkaWZmdGltZShTeXMudGltZSgpLCBub3cpDQogICAgICAgICAjIHJldHVybiBhIGNoYXJhY3RlciBzdHJpbmcgdG8gc2hvdyB0aGUgdGltZQ0KICAgICAgICAgcGFzdGUoIlRpbWUgZm9yIHRoaXMgY29kZSBjaHVuayB0byBydW46IiwgcmVzKQ0KICAgICAgfQ0KICAgfQ0KfSkpDQoNCmtuaXRyOjpvcHRzX2NodW5rJHNldCh0aW1lX2l0ID0gVFJVRSkNCmBgYA0KDQpgYGB7ciBzZXR1cCwgaW5jbHVkZT1GQUxTRX0NCiMga25pdHI6Om9wdHNfY2h1bmskc2V0KGVjaG8gPSBUUlVFKQ0KYGBgDQoNCiMjIyByZWZlcmVuY2lhbmRvIG9zIHBhY290ZXMNCg0KYGBge3IgcmVmZXJlbmNpYW5kbyBvcyBwYWNvdGVzfQ0KIyB2ZXJzaW9uJHZlcnNpb24uc3RyaW5nDQojIGNpdGF0aW9uKHBhY2thZ2UgPSAidGlkeXZlcnNlIikNCmBgYA0KDQojIyBpbXBvcnRhbmRvIGEgcGxhbmlsaGENCg0KYGBge3IgSW1wb3J0YW5kbyBhIHBsYW5pbGhhLCBlY2hvID0gRkFMU0UsIG1lc3NhZ2UgPSBUUlVFLCB3YXJuaW5nID0gRkFMU0V9DQpwbGFuX3dpZGVfMTk5MDIwMjAgPC0gcmVhZF9kZWxpbSgiaHR0cHM6Ly9yYXcuZ2l0aHVidXNlcmNvbnRlbnQuY29tL2xlb25hcmRvZndpbmsvVENDX2doL21haW4vcGxhbl93aWRlXzE5OTAyMDIwLnRzdiIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZWxpbSA9ICJcdCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZXNjYXBlX2RvdWJsZSA9IEZBTFNFLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgY29sX3R5cGVzID0gY29scygNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQWxjYWxpbmlkYWRlID0gY29sX2RvdWJsZSgpLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBDT0RJR08gPSBjb2xfY2hhcmFjdGVyKCksIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBDT09SRF9HRU9fTEFUX0dSQVUgPSBjb2xfZG91YmxlKCksDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIENPT1JEX0dFT19MT05HX0dSQVUgPSBjb2xfZG91YmxlKCksDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIERBVEFfQ09MRVRBID0gY29sX2RhdGUoZm9ybWF0ID0gIiVkLyVtLyVZIiksDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIE5pdHJhdG8gPSBjb2xfZG91YmxlKCksIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBOaXRyaXRvID0gY29sX2RvdWJsZSgpLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBTRFQgPSBjb2xfZG91YmxlKCksIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBTU1QgPSBjb2xfZG91YmxlKCksDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGBWYXphb2AgPSBjb2xfZG91YmxlKCksIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBgVmF6YW8gcmlvYCA9IGNvbF9kb3VibGUoKQ0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgKSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGxvY2FsZSA9IGxvY2FsZSgNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGF0ZV9uYW1lcyA9ICJwdCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZWNpbWFsX21hcmsgPSAiLCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGdyb3VwaW5nX21hcmsgPSAiIg0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgKSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHRyaW1fd3MgPSBUUlVFDQopICU+JSANCiAgcmVuYW1lKA0KICAgIEVfY29saSA9IGBFc2NoZXJpY2hpYSBjb2xpYCwNCiAgICBmb3NmYXRvX29ydG8gPSBgRm9zZmF0byBvcnRvYCwNCiAgICBmb3Nmb3JvX3RvdGFsID0gYEbDs3Nmb3JvIHRvdGFsYCwNCiAgICBuaXRyb19vcmdhbmljbyA9IGBOaXRyb2fDqm5pbyBvcmfDom5pY29gLA0KICAgIG5pdHJvX2Ftb24gPSBgTml0cm9nw6puaW8gYW1vbmlhY2FsYCwNCiAgICBuaXRyb19ramVsZGFobCA9IGBOaXRyb2fDqm5pbyBLamVsZGFobGAsDQogICAgbml0cm9fdG90YWwgPSBgTml0cm9nw6puaW8gdG90YWxgLA0KICAgIG94aWdlbmlvX2Rpc3NvbHZpZG8gPSBgT3hpZ8OqbmlvIGRpc3NvbHZpZG9gLA0KICAgIHNhdF9PRCA9IGAlc2F0IE9EYCwNCiAgICB0ZW1wX2FndWEgPSBgVGVtcGVyYXR1cmEgw6FndWFgLA0KICAgIHRlbXBfYXIgPSBgVGVtcGVyYXR1cmEgYXJgLA0KICAgIHRyYW5zcGFyZW5jaWFfYWd1YSA9IGBUcmFuc3BhcsOqbmNpYSDDoWd1YWAsDQogICAgdmF6YW9fcmlvID0gYFZhemFvIHJpb2AsDQogICAgY29saWZvcm1lc190ZXJtbyA9IGBDb2xpZm9ybWVzIHRlcm1vdG9sYCwNCiAgICB0dXJiaWRleiA9IFR1cmJpZGV6LA0KICAgIHNvbGlkb3NfdG90YWlzID0gYFPDs2xpZG9zIHRvdGFpc2AsDQogICkNCg0KZ2xpbXBzZShwbGFuX3dpZGVfMTk5MDIwMjApDQojIHRlc3RlIDwtIHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUNCiMgICBkcGx5cjo6ZmlsdGVyKERBVEFfQ09MRVRBID49IGFzLlBPU0lYY3QoIjIwMTAtMDEtMDEiKSkgI3RoaXMgd29ya3MNCiMgDQojIHRlc3RlJERBVEFfQ09MRVRBIDwtIGFzLlBPU0lYY3QodGVzdGUkREFUQV9DT0xFVEEpDQojIA0KIyB0ZXN0ZSAlPiUgDQojICAgZHBseXI6OmFycmFuZ2UoREFUQV9DT0xFVEEpDQojIHRlc3RlICU+JSANCiMgICBmaWx0ZXJfdGltZSh0aW1lX2Zvcm11bGEgPSAnMjAxMy0wMS0wMScgfiAnMjAyMC0xMi0zMScpDQojIA0KIyANCiMgdHlwZW9mKHRlc3RlJERBVEFfQ09MRVRBKQ0KIyANCiMgICBhc190YmxfdGltZShwbGFuX3dpZGVfMTk5MDIwMjAsIGluZGV4ID0gREFUQV9DT0xFVEEpDQojIHN0cihwbGFuX3dpZGVfMTk5MDIwMjAkREFUQV9DT0xFVEEpDQpgYGANCg0KYGBge3IgVmlzdWFsaXphw6fDo28gZGEgcGxhbmlsaGEgaW1wb3J0YWRhLCBlY2hvID0gRkFMU0V9DQpwYWdlZF90YWJsZShwbGFuX3dpZGVfMTk5MDIwMjAsDQogICAgICAgICAgICBvcHRpb25zID0gbGlzdChyb3dzLnByaW50ID0gMTUsDQogICAgICAgICAgICAgICAgICAgICAgICAgICBjb2xzLnByaW50ID0gMTApKQ0KYGBgDQoNCiMgZGF0YSB3cmFuZ2xpbmcNCg0KQ29tbyBow6EgZGFkb3MgZmFsdGFudGVzLCBubyBjw6FsY3VsbyBlbnRyZSBvIHByb2R1dG8gZGFzIGNvbHVuYXMsIG8gUiBhY2FiYSBpbnRlcnByZXRhbmRvIGNvbW8gc2UgZm9zc2UgemVybywgbWFzIG5hIHZlcmRhZGUgw6kgYE5BYC4NCmBgYHtyIGRhdGEgd3JhbmdsaW5nfQ0KcGxhbl93aWRlXzE5OTAyMDIwIDwtIHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUgDQogICBtdXRhdGUoSVFBID0gaWZlbHNlKElRQSA9PSAwLCBOQSwgSVFBKSkNCg0KcGFyYW1ldHJvc19JUUEgPC0gcGxhbl93aWRlXzE5OTAyMDIwICU+JQ0KICBzZWxlY3QoQ09ESUdPLA0KICAgICAgICAgcEgsDQogICAgICAgICBEQk8sDQogICAgICAgICBFX2NvbGksDQogICAgICAgICBuaXRyb19hbW9uLA0KICAgICAgICAgbml0cm9fa2plbGRhaGwsDQogICAgICAgICBuaXRyb190b3RhbCwNCiAgICAgICAgIGZvc2Zvcm9fdG90YWwsDQogICAgICAgICB0ZW1wX2FndWEsDQogICAgICAgICB0dXJiaWRleiwNCiAgICAgICAgIHNvbGlkb3NfdG90YWlzLA0KICAgICAgICAgb3hpZ2VuaW9fZGlzc29sdmlkbywNCiAgICAgICAgIENvbmR1dGl2aWRhZGUsDQogICAgICAgICBBTk9fQ09MRVRBKQ0KDQp3cml0ZS5jc3YocGFyYW1ldHJvc19JUUEsDQogICAgICAgICAgIi4vcGFyYW1ldHJvc19JUUEuY3N2IiwNCiAgICAgICAgICByb3cubmFtZXMgPSBGQUxTRSkNCg0KcGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgc2VsZWN0KHN0YXJ0c193aXRoKCJJUUFfXiIpKSAlPiUgDQogIG11dGF0ZSgNCiAgICBURVNUQU5ET0lRQSA9IHByb2QoKQ0KICApDQojIGxpYnJhcnkocGVyZm9ybWFuY2UpDQojIG1vZGVsbyA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lIA0KIyAgIHNlbGVjdChDT0RJR08sIG94aWdlbmlvX2Rpc3NvbHZpZG8sIHBlcmlvZG8pICU+JSANCiMgICBncm91cF9ieShDT0RJR08sIHBlcmlvZG8pICU+JSANCiMgICBsbSgpICU+JSANCiMgICBwZXJmb3JtYW5jZTo6Y2hlY2tfZGlzdHJpYnV0aW9uKCkNCiMgIyBsbSgpDQojIA0KIyBjaGVja19tb2RlbChtb2RlbG8pDQojIHBlcmZvcm1hbmNlOjpjaGVja19hdXRvY29ycmVsYXRpb24obW9kZWxvKQ0KDQpgYGANCg0KYGBge3IgQ8OzZGlnb3MgR2l0LCBlY2hvID0gRkFMU0V9DQojIGNkIG15cmVwbw0KIyBscw0KIyBoZWFkIFJFQURNRS5tZA0KIyBnaXQgc3RhdHVzDQojIGdpdCBhZGQgUkVBRE1FLm1kDQojIGdpdCBjb21taXQgLW0gIkEgY29tbWl0IGZyb20gbXkgbG9jYWwgY29tcHV0ZXIiDQojIA0KIyBjZCAuLiAjIHZvbHRhciBwcm8gZGlyZXTDs3JpbyBhY2ltYQ0KIyBybSAtcmYgbXlyZXBvLyAjcmVtb3Zlci9hcGFnYXIgYSBwYXN0YSBteXJlcG8NCmBgYA0KDQpgYGB7ciBBcHJlbmRlbmRvIEdpdCwgZWNobyA9IEZBTFNFfQ0KIyBzbGlkZXMgZGEgYmlhIHF1ZSBhanVkYW0gbXQNCiMgaHR0cHM6Ly9iZWF0cml6bWlsei5naXRodWIuaW8vc2xpZGVzUi9naXRfcnN0dWRpby8xMS0yMDIxLUVOQ0UuaHRtbCMyMA0KIyBhcHJlbmRlbmRvIGEgc2luY3Jvbml6YXIgdXNhbmRvIGVzc2UgZ3VpYSAtPiANCiMgaHR0cHM6Ly9oYXBweWdpdHdpdGhyLWNvbS50cmFuc2xhdGUuZ29vZy9wdXNoLXB1bGwtZ2l0aHViLmh0bWw/X3hfdHJfc2w9YXV0byZfeF90cl90bD1wdCZfeF90cl9obD1wdC1CUg0KIyBsaWJyYXJ5KHVzZXRoaXMpDQojIHVzZXRoaXM6OmNyZWF0ZV9naXRodWJfdG9rZW4oKSBjcmlhciB1bSBjw7NkaWdvIHByYSBhY2Vzc28gZSBzaW5jcm9uaXphw6fDo28gYmV0d2VlbiBSIGUgZ2l0aHViDQoNCiMgZ2l0Y3JlZHM6OmdpdGNyZWRzX3NldCgpIA0KIyANCiMgdXNlX2dpdF9jb25maWcodXNlci5uYW1lID0gImxlb25hcmRvZndpbmsiLA0KIyAgICAgICAgICAgICAgICB1c2VyLmVtYWlsID0gImxlb25hcmRvZndpbmtAZ21haWwuY29tIikNCiMgdXNldGhpczo6Z2hfdG9rZW5faGVscCgpDQoNCiMgQ29tbyBtb3N0cmFyIG9zIGRhZG9zIGRlIHVtIGFycXVpdm8gdmlhIEdpdC9HaXRIdWINCiMgZ2l0IGNsb25lIGh0dHBzOi8vZ2l0aHViLmNvbS9sZW9uYXJkb2Z3aW5rL215cmVwby5naXQNCiMgY2QgbXlyZXBvICNhY2Vzc2EgYSBwYXN0YSBteXJlcG8NCiMgbHMgI2xpc3RhIG9zIGFycXVpdm9zIGRhIHBhc3RhIA0KIyBoZWFkIFJFQURNRS5tZCAjbW9zdHJhIGFzIHByaW1laXJhcyBvYnNlcnZhw6fDtWVzIGRvIGFycXVpdm8NCg0KIyBDb21vIG1vc3RyYXIgb3MgZGFkb3MgZGUgdW0gYXJxdWl2byB2aWEgUg0KIyBoZWFkKEM6L1VzZXJzL0zDqW8vbXlyZXBvL1JFQURNRS5tZCkNCg0KIyBBZGljaW9uYXIgdW1hIGxpbmhhIGFvIFJFQURNRS5tZCBlIHZlcmlmaWNhciBzZSBvIEdpdCBwZXJjZWJlIGEgbXVkYW7Dp2ENCiMgZWNobyAiQSBsaW5lIEkgd3JvdGUgb24gbXkgbG9jYWwgY29tcHV0ZXIiID4+IFJFQURNRS5tZA0KIyBnaXQgc3RhdHVzDQojIyBDOlxVc2Vyc1xMw6lvXG15cmVwbz5naXQgc3RhdHVzDQojIyBPbiBicmFuY2ggbWFpbg0KIyMgWW91ciBicmFuY2ggaXMgdXAgdG8gZGF0ZSB3aXRoICdvcmlnaW4vbWFpbicuDQojIyANCiMjIENoYW5nZXMgbm90IHN0YWdlZCBmb3IgY29tbWl0Og0KIyMgICAodXNlICJnaXQgYWRkIDxmaWxlPi4uLiIgdG8gdXBkYXRlIHdoYXQgd2lsbCBiZSBjb21taXR0ZWQpDQojIyAgICh1c2UgImdpdCByZXN0b3JlIDxmaWxlPi4uLiIgdG8gZGlzY2FyZCBjaGFuZ2VzIGluIHdvcmtpbmcgZGlyZWN0b3J5KQ0KIyMgICAgICAgICAqKm1vZGlmaWVkOiAgIFJFQURNRS5tZCoqDQojIyANCiMjIG5vIGNoYW5nZXMgYWRkZWQgdG8gY29tbWl0ICh1c2UgImdpdCBhZGQiIGFuZC9vciAiZ2l0IGNvbW1pdCAtYSIpDQpgYGANCg0KIyBzZXR0aW5nIHRoZW1lDQoNCmBgYHtyIHNldHRpbmcgdGhlbWV9DQp0aGVtZV9ncmFmcyA8LSBmdW5jdGlvbihiZyA9ICJ3aGl0ZSIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgY29sb3JhY2FvX2xldHJhID0gImJsYWNrIikgew0KICB0aGVtZSgNCiAgICBwbG90LnRpdGxlID0gDQogICAgICBlbGVtZW50X3RleHQoDQogICAgICAgIGhqdXN0ID0gMC41LA0KICAgICAgICBjb2xvciA9IGNvbG9yYWNhb19sZXRyYSwNCiAgICAgICAgc2l6ZSA9IDE5KSwNCiAgICANCiAgICBheGlzLnRpdGxlLnggPSANCiAgICAgICMgZWxlbWVudF90ZXh0KA0KICAgICAgIyBjb2xvciA9IGNvbG9yYWNhb19sZXRyYSwNCiAgICAgICMgc2l6ZSA9IDE1LA0KICAgICAgIyBhbmdsZSA9IDAsKSwNCiAgICAgIGVsZW1lbnRfYmxhbmsoKSwNCiAgICBheGlzLnRpdGxlLnkgPSBlbGVtZW50X3RleHQoDQogICAgICBjb2xvciA9IGNvbG9yYWNhb19sZXRyYSwNCiAgICAgIHNpemUgPSAxNSwNCiAgICAgIGFuZ2xlID0gOTApLA0KICAgIA0KICAgIGF4aXMudGV4dC54ID0gZWxlbWVudF90ZXh0KA0KICAgICAgY29sb3IgPSBjb2xvcmFjYW9fbGV0cmEsDQogICAgICBzaXplID0gMTcpLA0KICAgIGF4aXMudGV4dC55ID0gZWxlbWVudF90ZXh0KA0KICAgICAgY29sb3IgPSBjb2xvcmFjYW9fbGV0cmEsDQogICAgICBzaXplID0gMTcsDQogICAgICBhbmdsZSA9IDApLA0KICAgIA0KICAgIHN0cmlwLmJhY2tncm91bmQgPSBlbGVtZW50X3JlY3QoZmlsbCA9IGJnLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbGluZXR5cGUgPSAxLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgc2l6ZSA9IDAuNSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNvbG9yID0gImJsYWNrIiksDQogICAgc3RyaXAudGV4dCA9IGVsZW1lbnRfdGV4dChzaXplID0gMTcpLA0KICAgIHBhbmVsLmJhY2tncm91bmQgPSBlbGVtZW50X3JlY3QoZmlsbCA9IGJnKSwNCiAgICBwbG90LmJhY2tncm91bmQgPSBlbGVtZW50X3JlY3QoZmlsbCA9IGJnKSwNCiAgICBwbG90Lm1hcmdpbiA9IG1hcmdpbihsID0gNSwgciA9IDEwLA0KICAgICAgICAgICAgICAgICAgICAgICAgIGIgPSA1LCB0ID0gNSkNCiAgKQ0KfQ0KYGBgDQoNCiMgc2V0dGluZyBkaWZmZXJlbnQgdGltZXNjYWxlcw0KDQpgYGB7ciBzZXR0aW5nIHBlcmlvZG9zLCBlY2hvID0gRkFMU0V9DQpwbGFuX3dpZGVfMTk5MDIwMjAgPC0gcGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgIyBzZWxlY3QoQ09ESUdPLCBBTk9fQ09MRVRBKSAlPiUgDQogIG11dGF0ZSgNCiAgICBwZXJpb2RvID0gaWZfZWxzZSgNCiAgICAgIEFOT19DT0xFVEEgPD0gMjAwMCwgDQogICAgICAiMTk5MC0yMDAwIiwNCiAgICAgIGlmX2Vsc2UoDQogICAgICAgIEFOT19DT0xFVEEgPD0gMjAxMCwNCiAgICAgICAgIjIwMDAtMjAxMCIsDQogICAgICAgICIyMDEwLTIwMjAiDQogICAgICApDQogICAgKQ0KICApDQpgYGANCg0KIyBzZXR0aW5nIHN1bWFyaWVzDQoNCmBgYHtyIFN1bcOhcmlvcywgZWNobyA9IEZBTFNFfQ0KIyBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQojICAgYXNfdGliYmxlKCkgJT4lIA0KIyAgIGZpbHRlcihBTk9fQ09MRVRBID4gIjE5OTAiICYNCiMgICAgICAgICAgICBBTk9fQ09MRVRBIDw9ICIyMDAwIikgJT4lIA0KIyAgIHNlbGVjdChjb2xuYW1lcyhwYXJhbWV0cm9zX0lRQSkpICU+JSANCiMgICBncm91cF9ieShDT0RJR08pICU+JSANCiMgICBncm91cF9ieShjb2xuYW1lcyhwYXJhbWV0cm9zX0lRQSkpICU+JSANCiMgICBzdW1tYXJpc2VfZWFjaCgNCiMgICAgIGZ1bnMoIA0KIyAgICAgICBtaW4gPSANCiMgICAgICAgICBtaW4oLiwgDQojICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQojICAgICAgIHExID0gDQojICAgICAgICAgcXVhbnRpbGUoLiwgMC4yNSwgDQojICAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiMgICAgICAgbWVkaWFuID0gDQojICAgICAgICAgbWVkaWFuKC4sIA0KIyAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KIyAgICAgICBtZWFuID0gDQojICAgICAgICAgbWVhbiguLCANCiMgICAgICAgICAgICAgIG5hLnJtPSBUUlVFKSwNCiMgICAgICAgcTMgPSANCiMgICAgICAgICBxdWFudGlsZSguLCAwLjc1LCANCiMgICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KIyAgICAgICBtYXggPSANCiMgICAgICAgICBtYXgoLiwgDQojICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQojICAgICAgIG4gPSANCiMgICAgICAgICBsZW5ndGgoLikNCiMgICAgICkNCiMgICApICU+JSANCiMgICBwaXZvdF9sb25nZXIoDQojICAgICAgICAhQ09ESUdPLA0KIyAgICAgICAgbmFtZXNfdG8gPSAicGFyYW1ldHJvIiwNCiMgICAgICAgIHZhbHVlc190byA9ICJ2YWxvciINCiMgICAgICkgJT4lIA0KIyAgICAgcGl2b3Rfd2lkZXIobmFtZXNfZnJvbSA9IENPRElHTywNCiMgICAgICAgICAgICAgICAgIHZhbHVlc19mcm9tID0gdmFsb3IpICU+JSANCiMgICBncm91cF9ieShwYXJhbWV0cm8pDQoNCg0KDQojIHAyIDwtIHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUNCiMgICBmaWx0ZXIoQU5PX0NPTEVUQSA+ICIyMDAwIiAmDQojICAgICAgICAgIEFOT19DT0xFVEEgPD0gIjIwMTAiKQ0KIyANCiMgcDMgPC0gcGxhbl93aWRlXzE5OTAyMDIwICU+JQ0KIyAgIGZpbHRlcihBTk9fQ09MRVRBID4gIjIwMTAiICYNCiMgICAgICAgICAgQU5PX0NPTEVUQSA8PSAiMjAyMCIpDQoNCiMgcGVyaW9kbyA9IGMocDEgPC0gcGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiMgICBmaWx0ZXIoQU5PX0NPTEVUQSA+ICIxOTkwIiAmDQojICAgICAgICAgICAgQU5PX0NPTEVUQSA8PSAiMjAwMCIpLA0KIyANCiMgcDIgPC0gcGxhbl93aWRlXzE5OTAyMDIwICU+JQ0KIyAgIGZpbHRlcihBTk9fQ09MRVRBID4gIjIwMDAiICYNCiMgICAgICAgICAgICBBTk9fQ09MRVRBIDw9ICIyMDEwIiksDQojIA0KIyBwMyA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQojICAgZmlsdGVyKEFOT19DT0xFVEEgPiAiMjAxMCIgJg0KIyAgICAgICAgICAgIEFOT19DT0xFVEEgPD0gIjIwMjAiKSkNCg0KIyBzdW1hcmlvIDwtIGZ1bmN0aW9uKHBhcmFtZXRyb3MgPSBwYXJhbWV0cm9zLCBwZXJpb2RvKXsNCiMgICBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQojICAgIHNlbGVjdChDT0RJR08sIC4sIEFOT19DT0xFVEEpICU+JSANCiMgICAgIyBmaWx0ZXIoQU5PX0NPTEVUQT4iMTk5MCIgJg0KIyAgICAjICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDAwIikgJT4lIA0KIyAgICBncm91cF9ieShDT0RJR08pICU+JSANCiMgICAgc3VtbWFyaXplKA0KIyAgICAgIG1pbiA9IA0KIyAgICAgICAgbWluKHBhcmFtZXRyb3MsIA0KIyAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQojICAgICAgcTEgPSANCiMgICAgICAgIHF1YW50aWxlKHBhcmFtZXRyb3MsIDAuMjUsIA0KIyAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiMgICAgICBtZWRpYW4gPSANCiMgICAgICAgIG1lZGlhbihwYXJhbWV0cm9zLCANCiMgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KIyAgICAgIG1lYW4gPSANCiMgICAgICAgIG1lYW4ocGFyYW1ldHJvcywgDQojICAgICAgICAgICAgIG5hLnJtPSBUUlVFKSwNCiMgICAgICBxMyA9IA0KIyAgICAgICAgcXVhbnRpbGUocGFyYW1ldHJvcywgMC43NSwgDQojICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KIyAgICAgIG1heCA9IA0KIyAgICAgICAgbWF4KHBhcmFtZXRyb3MsIA0KIyAgICAgICAgICAgIG5hLnJtID0gVFJVRSkpDQojIH0NCg0KIyBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lIA0KIyAgIHN1bWFyaW8ocGFyYW1ldHJvcyA9IERCTykNCg0KIyBzdW1fSVFBX3AxIDwtIHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUNCiMgICAgZHBseXI6OnNlbGVjdChDT0RJR08sIElRQSwgQU5PX0NPTEVUQSkgJT4lDQojICAgIGZpbHRlcihBTk9fQ09MRVRBPiIxOTkwIiAmDQojICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDAwIikgJT4lDQojICAgIGdyb3VwX2J5KENPRElHTykgJT4lDQojICAgIHN1bW1hcml6ZSgNCiMgICAgICBtaW4gPQ0KIyAgICAgICAgbWluKElRQSwNCiMgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KIyAgICAgIHExID0NCiMgICAgICAgIHF1YW50aWxlKElRQSwgMC4yNSwNCiMgICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQojICAgICAgbWVkaWFuID0NCiMgICAgICAgIG1lZGlhbihJUUEsDQojICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiMgICAgICBtZWFuID0NCiMgICAgICAgIG1lYW4oSVFBLA0KIyAgICAgICAgICAgICBuYS5ybT0gVFJVRSksDQojICAgICAgcTMgPQ0KIyAgICAgICAgcXVhbnRpbGUoSVFBLCAwLjc1LA0KIyAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiMgICAgICBtYXggPQ0KIyAgICAgICAgbWF4KElRQSwNCiMgICAgICAgICAgICBuYS5ybSA9IFRSVUUpKQ0KYGBgDQoNCiMgY3JpYW5kbyBmdW7Dp8OjbyBwYXJhIGdlcmFyIGJveHBsb3RzIGNvbSBwZXJjZW50aWwgMjAgZSA4MA0KDQpgYGB7ciBmdW5jYW8gcGVyY2VudGlsIDgwfQ0KZiA8LSBmdW5jdGlvbih4KSB7DQogIHIgPC0gcXVhbnRpbGUoeCwgcHJvYnMgPSBjKDAuMDUsIDAuMjAsIDAuNTAsIDAuODAsIDAuOTUpKQ0KICBuYW1lcyhyKSA8LSBjKCJ5bWluIiwgImxvd2VyIiwgIm1pZGRsZSIsICJ1cHBlciIsICJ5bWF4IikNCiAgcmV0dXJuKHIpDQp9DQpgYGANCg0KIyBQYXLDom1ldHJvcyBmw61zaWNvLXF1w61taWNvcw0KDQojIyMgT3hpZ8OqbmlvIERpc3NvbHZpZG8NCg0KYGBge3IgR3LDoWZpY28gT0QgZmFjZXR0ZWQsIGVjaG8gPSBGQUxTRSwgd2FybmluZz1GQUxTRSwgbWVzc2FnZSA9IEZBTFNFLCBmaWcuY2FwPSJPeGlnw6puaW8gRGlzc29sdmlkbyBubyBwZXLDrW9kbyAxOTkwLTIwMjAifQ0KIyB5IDwtIHJub3JtKDEwMCkNCiMgZGYgPC0gZGF0YS5mcmFtZSgNCiMgICB4ID0gMSwNCiMgICB5MCA9IHF1YW50aWxlKHksIDAuMDUpLA0KIyAgIHkyNSA9IHF1YW50aWxlKHksIDAuMjUpLA0KIyAgIHk1MCA9IG1lZGlhbih5KSwNCiMgICB5NzUgPSBxdWFudGlsZSh5LCAwLjc1KSwNCiMgICB5MTAwID0gcXVhbnRpbGUoeSwgMC45NSkNCiMgKQ0KIyAjIHBhY21hbjo6cF9sb2FkKGdnYmVlc3dhcm0pDQojIGdncGxvdChkZiwgYWVzKHgpKSArDQojICAgZ2VvbV9ib3hwbG90KA0KIyAgICAgYWVzKHltaW4gPSB5MCwgbG93ZXIgPSB5MjUsIG1pZGRsZSA9IHk1MCwgdXBwZXIgPSB5NzUsIHltYXggPSB5MTAwKSwNCiMgICAgIHN0YXQgPSAiaWRlbnRpdHkiDQojICAgKQ0KIyBzdW1tYXJ5KHkpDQojIHF1YW50aWxlKHksIHByb2JzID0gYygwLjA1LCAwLjEwLCAwLjI1LCAwLjUwLCAwLjc1LCAwLjgwLCAwLjkwKSkNCiMgDQojIHN1bW1hcnkoZGYpDQojIG9kX3AwNTIwXzgwXzk1DQojIG9kX3AxMDIwXzgwXzkwDQoNCihvZF9wMDUyMF84MF85NSA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogIGZpbHRlcihDT0RJR08gPT0gIjg3Mzk4OTAwIikgJT4lIA0KICAgIGdncGxvdCgNCiAgICAgIGFlcygNCiAgICAgICAgeCA9IENPRElHTywNCiAgICAgICAgeSA9IG94aWdlbmlvX2Rpc3NvbHZpZG8sDQogICAgICAgICMgY29sb3IgPSBwZXJpb2RvLA0KICAgICAgICAjIGZpbGwgPSBwZXJpb2RvDQogICAgICAgICkNCiAgICApKw0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluID0gLUluZiwgeG1heCA9IEluZiwNCiAgICAgICAgICAgICB5bWluID0gLUluZiwgeW1heCA9IDIsDQogICAgICAgICAgICAgYWxwaGEgPSAxLA0KICAgICAgICAgICAgIGZpbGwgPSAiI2FjNTA3OSIpKyAjPnBpb3IgY2xhc3NlDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW4gPSAtSW5mLCB4bWF4ID0gSW5mLA0KICAgICAgICAgICAgIHltaW4gPSAyLCB5bWF4ID0gNCwNCiAgICAgICAgICAgICBhbHBoYSA9IDEsDQogICAgICAgICAgICAgZmlsbCA9ICIjZWI1NjYxIikrICNjbGFzc2UgNA0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluID0gLUluZiwgeG1heCA9IEluZiwNCiAgICAgICAgICAgICB5bWluID0gNCwgeW1heCA9IDUsDQogICAgICAgICAgICAgYWxwaGEgPSAxLA0KICAgICAgICAgICAgIGZpbGwgPSAiI2ZjZjdhYiIpKyAjY2xhc3NlIDMNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbiA9IC1JbmYsIHhtYXggPSBJbmYsDQogICAgICAgICAgICAgeW1pbiA9IDUsIHltYXggPSA2LA0KICAgICAgICAgICAgIGFscGhhID0gMSwNCiAgICAgICAgICAgICBmaWxsID0gIiM3MGMxOGMiKSsgI2NsYXNzZSAyDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW4gPSAtSW5mLCB4bWF4ID0gSW5mLA0KICAgICAgICAgICAgIHltaW49IDYsIHltYXggPSBJbmYsDQogICAgICAgICAgICAgYWxwaGEgPSAxLA0KICAgICAgICAgICAgIGZpbGwgPSAiIzhkY2RlYiIpKyAjY2xhc3NlIDENCiAgIHN0YXRfc3VtbWFyeSgNCiAgICAgZnVuLmRhdGEgPSBmLA0KICAgICBnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgd2lkdGggPSAwLjMsDQogICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSwNCiAgICkrDQogICBzdGF0X3N1bW1hcnkoDQogICAgIGZ1bi5kYXRhID0gZiwNCiAgICAgZ2VvbSA9ICJib3hwbG90IiwNCiAgICAgd2lkdGggPSAwLjcsDQogICAgIGZpbGwgPSAnI0Y4RjhGRicsDQogICAgIGNvbG9yID0gImJsYWNrIiwNCiAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICApKw0KICAgICMgZ2VvbV9ib3hwbG90KA0KICAgICMgICAjIGZpbGwgPSAnI0Y4RjhGRicsDQogICAgIyAgICMgY29sb3IgPSAiYmxhY2siLA0KICAgICAgIyBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAjICAgIyB3aWR0aCA9IDAuNw0KICAgICMgICBzdGF0ID0gImlkZW50aXR5Ig0KICAgICMgKSsNCiAgICMgc3RhdF9zdW1tYXJ5KA0KICAgIyAgIGZ1bi5kYXRhID0gbWVkaWFuX2hpbG93LA0KICAgIyAgIGZ1bi5hcmdzID0gMC42LA0KICAgIyAgIHNob3cubGVnZW5kID0gRkFMU0UsDQogICAjICAgZ2VvbSA9ICJjcm9zc2JhciIsDQogICAjICAgZmlsbCA9ICcjRjhGOEZGJywNCiAgICMgICBjb2xvciA9ICJibGFjayIsDQogICAjICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAjICAgd2lkdGggPSAwLjcNCiAgICMgICkrDQogICAgZmFjZXRfd3JhcCh+cGVyaW9kbykrDQogICAgbGFicygNCiAgICAgIHRpdGxlID0gIk94aWfDqm5pbyBEaXNzb2x2aWRvIG5vIHBlcsOtb2RvIDE5OTAtMjAyMCIsDQogICAgICB4PSBOVUxMLA0KICAgICAgeT0ibWcvTCINCiAgICApKw0KICAgIGdnYmVlc3dhcm06Omdlb21fcXVhc2lyYW5kb20oDQogICAgICAgc2l6ZSA9IDEuMiwNCiAgICAgICBhbHBoYSA9IC4yNSwNCiAgICAgICB3aWR0aCA9IC4wNywNCiAgICApKw0KICAgIHNjYWxlX3lfY29udGludW91cygNCiAgICAgIGV4cGFuZCA9IGV4cGFuc2lvbihtdWx0ID0gYygwLDApKSwNCiAgICAgIG4uYnJlYWtzID0gMTEsDQogICAgICBsaW1pdHMgPSBjKC0wLjMsMjEpDQogICAgKSsNCiAgICBzY2FsZV94X2Rpc2NyZXRlKGxpbWl0cyA9IGMoIjg3Mzk4NTAwIiwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTgwIiwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTAwIiwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTUwIiwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA1NTAwIiwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA2OTAwIiwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA5OTAwIiksDQogICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgICkrDQogICAgc2NhbGVfZmlsbF9icmV3ZXIocGFsZXR0ZSA9ICJTZXQxIikrDQogICAgc2NhbGVfY29sb3JfbWFudWFsKG5hbWUgPSAiUGVyw61vZG8iLA0KICAgIGJyZWFrcyA9IGMoInAxIiwgInAyIiwgInAzIiksDQogICAgdmFsdWVzID0gYygiYmxhY2siLCAiIzMwMzAzMCIsICIjNjk2OTY5IiksDQogICAgbGFiZWxzID0gYygiMTk5MC0yMDAwIiwgIjIwMDAtMjAxMCIsICIyMDEwLTIwMjAiKQ0KICAgICkrDQogICBnZW9tX3Ntb290aCgNCiAgICAgbWV0aG9kID0gImxtIiwNCiAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgIGFlcyhncm91cCA9IDEpLA0KICAgICBhbHBoYSA9IC41LA0KICAgICBuYS5ybSA9IFRSVUUsDQogICAgIHNpemUgPSAxDQogICApKw0KICAgdGhlbWVfZ3JhZnMoKQ0KICkNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBPRCBwZXJpb2RvIDEsIGVjaG8gPSBGQUxTRSwgd2FybmluZz1GQUxTRSwgbWVzc2FnZSA9IEZBTFNFLCBmaWcuY2FwPSJPeGlnw6puaW8gRGlzc29sdmlkbyBubyBwZXLDrW9kbyAxOTkwLTIwMDAifQ0KKG9kX3AxIDwtIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAgJT4lIA0KICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQU5PX0NPTEVUQSA+ICIxOTkwIiAmDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICBBTk9fQ09MRVRBIDw9ICIyMDAwIiksDQogICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICBveGlnZW5pb19kaXNzb2x2aWRvKQ0KKSsNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW4gPSAtSW5mLCB4bWF4ID0gSW5mLA0KICAgICAgICAgICAgeW1pbiA9IC1JbmYsIHltYXggPSAyLA0KICAgICAgICAgICAgYWxwaGEgPSAxLA0KICAgICAgICAgICAgZmlsbCA9ICIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW4gPSAtSW5mLCB4bWF4ID0gSW5mLA0KICAgICAgICAgICAgeW1pbiA9IDIsIHltYXggPSA0LA0KICAgICAgICAgICAgYWxwaGEgPSAxLA0KICAgICAgICAgICAgZmlsbCA9ICIjZWI1NjYxIikrICNjbGFzc2UgNA0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbiA9IC1JbmYsIHhtYXggPSBJbmYsDQogICAgICAgICAgICB5bWluID0gNCwgeW1heCA9IDUsDQogICAgICAgICAgICBhbHBoYSA9IDEsDQogICAgICAgICAgICBmaWxsID0gIiNmY2Y3YWIiKSsgI2NsYXNzZSAzDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluID0gLUluZiwgeG1heCA9IEluZiwNCiAgICAgICAgICAgIHltaW4gPSA1LCB5bWF4ID0gNiwNCiAgICAgICAgICAgIGFscGhhID0gMSwNCiAgICAgICAgICAgIGZpbGwgPSAiIzcwYzE4YyIpKyAjY2xhc3NlIDINCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW4gPSAtSW5mLCB4bWF4ID0gSW5mLA0KICAgICAgICAgICAgeW1pbj0gNiwgeW1heCA9IEluZiwNCiAgICAgICAgICAgIGFscGhhID0gMSwNCiAgICAgICAgICAgIGZpbGwgPSAiIzhkY2RlYiIpKyAjY2xhc3NlIDENCiAgIHN0YXRfYm94cGxvdCgNCiAgICAgIGdlb20gPSAnZXJyb3JiYXInLA0KICAgICAgd2lkdGggPSAwLjMsDQogICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkNCiAgICkrDQogICBnZW9tX2JveHBsb3QoDQogICAgICBmaWxsID0gJyNGOEY4RkYnLA0KICAgICAgY29sb3IgPSAiYmxhY2siLA0KICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICB3aWR0aCA9IDAuNw0KICAgKSsNCiAgIGxhYnMoDQogICAgICB0aXRsZSA9ICJPeGlnw6puaW8gRGlzc29sdmlkbyBubyBwZXLDrW9kbyAxOTkwLTIwMDAiLA0KICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgIHk9Im1nL0wiDQogICApKw0KICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgIHNpemUgPSAxLjIsDQogICAgICBhbHBoYSA9IC4yNSwNCiAgICAgIHdpZHRoID0gLjA3LA0KICAgKSsNCiAgIHNjYWxlX3lfY29udGludW91cygNCiAgICAgIGV4cGFuZCA9IGV4cGFuc2lvbihtdWx0ID0gYygwLDApKSwNCiAgICAgIG4uYnJlYWtzID0gMTEsDQogICAgICBsaW1pdHMgPSBjKC0xLDIxKQ0KICAgKSsNCiAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTAwIiwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA2OTAwIiwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gYygiUE0xIiwgIlBNMiIsICJQTTMiLCAiUE00IiwgIlBNNSIsICJQTTYiLCAiUE03IikNCiAgICkrDQogICBnZW9tX3Ntb290aCgNCiAgICAgIG1ldGhvZCA9ICJsbSIsDQogICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgIGFlcyhncm91cCA9IDEpLA0KICAgICAgYWxwaGEgPSAuNSwNCiAgICAgIG5hLnJtID0gVFJVRSwNCiAgICAgIHNpemUgPSAxDQogICApKw0KICAgdGhlbWVfZ3JhZnMoKQ0KKQ0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIE9EIHBlcmlvZG8gMiwgZWNobyA9IEZBTFNFLCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlID0gRkFMU0V9DQoob2RfcDIgPC1nZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMjAwMCIgJg0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICBBTk9fQ09MRVRBPD0iMjAxMCIpLA0KICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgIG94aWdlbmlvX2Rpc3NvbHZpZG8pKSsNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49LUluZiwNCiAgICAgICAgICAgICB5bWF4PTIsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MiwNCiAgICAgICAgICAgICB5bWF4PTQsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjZWI1NjYxIikrICNjbGFzc2UgNA0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj00LA0KICAgICAgICAgICAgIHltYXg9NSwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiNmY2Y3YWIiKSsgI2NsYXNzZSAzDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTUsDQogICAgICAgICAgICAgeW1heD02LA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iIzcwYzE4YyIpKyAjY2xhc3NlIDINCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49NiwNCiAgICAgICAgICAgICB5bWF4PUluZiwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICAgc3RhdF9ib3hwbG90KGdlb20gPSAnZXJyb3JiYXInLA0KICAgICAgICAgICAgICAgICB3aWR0aD0wLjMsDQogICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSkrDQogICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgICBjb2xvcj0iYmxhY2siLA0KICAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICAgd2lkdGg9IDAuNykrDQogICAgbGFicyh0aXRsZSA9ICJPeGlnw6puaW8gRGlzc29sdmlkbyBubyBwZXLDrW9kbyAyMDAwLTIwMTAiLA0KICAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgIHk9TlVMTCkrDQogICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgICBzaXplID0gMS4yLA0KICAgICAgIGFscGhhID0gLjI1LA0KICAgICAgIHdpZHRoID0gLjA3LA0KICAgICkrDQogICAgc2NhbGVfeV9jb250aW51b3VzKA0KICAgICAgIGV4cGFuZCA9IGV4cGFuc2lvbihtdWx0ID0gYygwLDApKSwNCiAgICAgICBuLmJyZWFrcyA9IDExLA0KICAgICAgIGxpbWl0cyA9IGMoLTEsMjEpKSsNCiAgICBzY2FsZV94X2Rpc2NyZXRlKGxpbWl0cyA9IGMoIjg3Mzk4NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTUwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA5OTAwIiksDQogICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgICkrDQogICAgZ2VvbV9zbW9vdGgoDQogICAgICAgbWV0aG9kID0gImxtIiwNCiAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgYWxwaGE9LjUsDQogICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgIHNpemUgPSAxDQogICAgKSsNCiAgICB0aGVtZV9ncmFmcygpDQopDQpgYGANCg0KYGBge3IgR3LDoWZpY28gT0QgcGVyaW9kbyAzLCBlY2hvID0gRkFMU0UsIHdhcm5pbmc9RkFMU0UsIG1lc3NhZ2UgPSBGQUxTRX0NCihvZF9wMyA8LWdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAgJT4lIA0KICAgICAgICAgICAgICAgICAgIGZpbHRlcihBTk9fQ09MRVRBPiIyMDEwIiAmDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDIwIikgJT4lIA0KICAgICAgICAgICAgICAgICAgZ3JvdXBfYnkoQ09ESUdPKSwNCiAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICBveGlnZW5pb19kaXNzb2x2aWRvKSkrDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPS1JbmYsDQogICAgICAgICAgICAgeW1heD0yLA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iI2FjNTA3OSIpKyAjPnBpb3IgY2xhc3NlDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTIsDQogICAgICAgICAgICAgeW1heD00LA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iI2ViNTY2MSIpKyAjY2xhc3NlIDQNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49NCwNCiAgICAgICAgICAgICB5bWF4PTUsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjZmNmN2FiIikrICNjbGFzc2UgMw0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj01LA0KICAgICAgICAgICAgIHltYXg9NiwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiM3MGMxOGMiKSsgI2NsYXNzZSAyDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTYsDQogICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICAgZ2VvbV9ib3hwbG90KA0KICAgICAjIGFlcygNCiAgICAgIyAgIHggPSBveGlnZW5pb19kaXNzb2x2aWRvLA0KICAgICAjICAgeW1pbiA9IG1pbihveGlnZW5pb19kaXNzb2x2aWRvKSwNCiAgICAgIyAgIGxvd2VyID0gcXVhbnRpbGUob3hpZ2VuaW9fZGlzc29sdmlkbywgMC4zMCwgbmEucm0gPSBUUlVFKSwNCiAgICAgIyAgIG1pZGRsZSA9IG1lZGlhbihveGlnZW5pb19kaXNzb2x2aWRvKSwNCiAgICAgIyAgIHVwcGVyID0gcXVhbnRpbGUob3hpZ2VuaW9fZGlzc29sdmlkbywgMC44MCwgbmEucm0gPSBUUlVFKSwNCiAgICAgIyAgIHltYXggPSBtYXgob3hpZ2VuaW9fZGlzc29sdmlkbykNCiAgICAgIyApLA0KICAgICAjIHN0YXQgPSAiaWRlbnRpdHkiLA0KICAgICBmaWxsPScjRjhGOEZGJywNCiAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgIHdpZHRoPSAwLjcNCiAgICkrDQogICBsYWJzKHRpdGxlID0gIk94aWfDqm5pbyBEaXNzb2x2aWRvIG5vIHBlcsOtb2RvIDIwMTAtMjAyMCIsDQogICAgICAgIHg9TlVMTCwNCiAgICAgICAgeT1OVUxMKSsNCiAgIGdnYmVlc3dhcm06Omdlb21fcXVhc2lyYW5kb20oDQogICAgIHNpemUgPSAxLjIsDQogICAgIGFscGhhID0gLjI1LA0KICAgICB3aWR0aCA9IC4wNywNCiAgICkrDQogICBzY2FsZV94X2Rpc2NyZXRlKGxpbWl0cyA9IGMoIjg3Mzk4NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTgwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTUwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA5OTAwIiksDQogICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgICkrDQogICAgc2NhbGVfeV9jb250aW51b3VzKA0KICAgICAgIGV4cGFuZCA9IGV4cGFuc2lvbihtdWx0ID0gYygwLDApKSwNCiAgICAgICBuLmJyZWFrcyA9IDExLA0KICAgICAgIGxpbWl0cyA9IGMoLTEsMjEpKSsNCiAgICBnZW9tX3Ntb290aCgNCiAgICAgICBtZXRob2QgPSAibG0iLA0KICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICBhbHBoYT0uNSwNCiAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgc2l6ZSA9IDENCiAgICApKw0KICAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBPRCAzIHBlcmlvZG9zIGp1bnRvcywgZWNobyA9IFRSVUUsIHdhcm5pbmc9RkFMU0UsIG1lc3NhZ2UgPSBGQUxTRSwgZmlnLmNhcD0iT3hpZ8OqbmlvIERpc3NvbHZpZG8gbm8gcGVyw61vZG8gMTk5MC0yMDIwIn0NCmdyaWQuYXJyYW5nZShvZF9wMSwgb2RfcDIsIG9kX3AzLCBuY29sID0gMykNCmBgYA0KDQpgYGB7ciBTYWx2YW5kbyBPRCwgd2FybmluZz1GQUxTRSwgbWVzc2FnZSA9IEZBTFNFLH0NCiMgZ2dzYXZlKCJvZC5wbmciLA0KIyAgICAgICAgdW5pdHMgPSBjKCJweCIpLA0KIyAgICAgICAgd2lkdGggPSA0NTAwLA0KIyAgICAgICAgaGVpZ2h0ID0gMjk5MywNCiMgICAgICAgIHBsb3QgPSBvZCwNCiMgICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQojICAgICAgICBkcGkgPSAzMDAsDQojICAgICAgICB0eXBlID0gImNhaXJvIikNCg0KZ2dzYXZlKCJvZF9wMS5wbmciLA0KICAgICAgIHBsb3QgPSBvZF9wMSwNCiAgICAgICBwYXRoID0gIi4vZ3JhZmljb3MiLA0KICAgICAgIGRwaSA9IDMwMCwNCiAgICAgICB0eXBlID0gImNhaXJvIikNCg0KZ2dzYXZlKCJvZF9wMi5wbmciLA0KICAgICAgIHBsb3QgPSBvZF9wMiwNCiAgICAgICBwYXRoID0gIi4vZ3JhZmljb3MiLA0KICAgICAgIGRwaSA9IDMwMCwNCiAgICAgICB0eXBlID0gImNhaXJvIikNCg0KZ2dzYXZlKCJvZF9wMy5wbmciLA0KICAgICAgIHBsb3QgPSBvZF9wMywNCiAgICAgICBwYXRoID0gIi4vZ3JhZmljb3MiLA0KICAgICAgIGRwaSA9IDMwMCwNCiAgICAgICB0eXBlID0gImNhaXJvIikNCg0KZ2dzYXZlKCJvZF8zcGVyaW9kb3MucG5nIiwNCiAgICAgICB1bml0cyA9IGMoInB4IiksDQogICAgICAgd2lkdGggPSA0NTAwLA0KICAgICAgIGhlaWdodCA9IDI5OTMsDQogICAgICAgcGxvdCA9IGdyaWQuYXJyYW5nZShvZF9wMSwgb2RfcDIsIG9kX3AzLCBuY29sID0gMyksDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQpgYGANCg0KYGBge3IgR3LDoWZpY28gT0RfY2hlcm5vYnlsLCBlY2hvID0gRkFMU0UsIHdhcm5pbmc9RkFMU0UsIG1lc3NhZ2UgPSBGQUxTRX0NCiMgcDEgPC0gZnVuY3Rpb24ocGxhbl93aWRlXzE5OTAyMDIwLCBBTk9fQ09MRVRBKSB7DQojICAgcGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiMgICAgIGZpbHRlcihBTk9fQ09MRVRBID4gIjE5OTAiICYNCiMgICAgICAgICAgICBBTk9fQ09MRVRBIDw9ICIyMDAwIikNCiMgfQ0KIyANCiMgDQojIGNsYXNzZXNfb2QgPC0gZnVuY3Rpb24ocGxhbl93aWRlXzE5OTAyMDIwLCBwYXJhbWV0cm8sIHBlcmlvZG8pew0KIyAgIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQojICAgICAgICAgICAgcGVyaW9kbyksDQojICAgYWVzKENPRElHTywNCiMgICAgICAgcGFyYW1ldHJvKQ0KIyB9DQoNCg0KIyAob2RfY2hlcm5vYnlsIDwtIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQojICAgICAgICAgICAgICAgICAgICAgICAgICAgcDEoQU5PX0NPTEVUQSA+ICIxOTkwIiAmDQojICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBBTk9fQ09MRVRBIDw9ICIyMDAwIiksDQojICAgICAgICAgICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQojICAgICAgICAgICAgICAgICAgICAgICAgICAgICBveGlnZW5pb19kaXNzb2x2aWRvKSkrDQojICAgICBhbm5vdGF0ZSgicmVjdCIsDQojICAgICAgICAgICAgICB4bWluPS1JbmYsDQojICAgICAgICAgICAgICB4bWF4PUluZiwNCiMgICAgICAgICAgICAgIHltaW49LUluZiwNCiMgICAgICAgICAgICAgIHltYXg9MiwNCiMgICAgICAgICAgICAgIGFscGhhPTEsDQojICAgICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiMgICAgIGFubm90YXRlKCJyZWN0IiwNCiMgICAgICAgICAgICAgIHhtaW49LUluZiwNCiMgICAgICAgICAgICAgIHhtYXg9SW5mLA0KIyAgICAgICAgICAgICAgeW1pbj0yLA0KIyAgICAgICAgICAgICAgeW1heD00LA0KIyAgICAgICAgICAgICAgYWxwaGE9MSwNCiMgICAgICAgICAgICAgIGZpbGw9IiNlYjU2NjEiKSsgI2NsYXNzZSA0DQojICAgICBhbm5vdGF0ZSgicmVjdCIsDQojICAgICAgICAgICAgICB4bWluPS1JbmYsDQojICAgICAgICAgICAgICB4bWF4PUluZiwNCiMgICAgICAgICAgICAgIHltaW49NCwNCiMgICAgICAgICAgICAgIHltYXg9NSwNCiMgICAgICAgICAgICAgIGFscGhhPTEsDQojICAgICAgICAgICAgICBmaWxsPSIjZmNmN2FiIikrICNjbGFzc2UgMw0KIyAgICAgYW5ub3RhdGUoInJlY3QiLA0KIyAgICAgICAgICAgICAgeG1pbj0tSW5mLA0KIyAgICAgICAgICAgICAgeG1heD1JbmYsDQojICAgICAgICAgICAgICB5bWluPTUsDQojICAgICAgICAgICAgICB5bWF4PTYsDQojICAgICAgICAgICAgICBhbHBoYT0xLA0KIyAgICAgICAgICAgICAgZmlsbD0iIzcwYzE4YyIpKyAjY2xhc3NlIDINCiMgICAgIGFubm90YXRlKCJyZWN0IiwNCiMgICAgICAgICAgICAgIHhtaW49LUluZiwNCiMgICAgICAgICAgICAgIHhtYXg9SW5mLA0KIyAgICAgICAgICAgICAgeW1pbj02LA0KIyAgICAgICAgICAgICAgeW1heD1JbmYsDQojICAgICAgICAgICAgICBhbHBoYT0xLA0KIyAgICAgICAgICAgICAgZmlsbD0iIzhkY2RlYiIpKyAjY2xhc3NlIDENCiMgICAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiMgICAgICAgICAgICAgICAgICB3aWR0aD0wLjMsDQojICAgICAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuNjUpKSsNCiMgICAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiMgICAgICAgICAgICAgICAgICBjb2xvcj0iYmxhY2siLA0KIyAgICAgICAgICAgICAgICAgIG91dGxpZXIuc2hhcGUgPSBOQSwgI3NlIGRlaXhhciBOQSBmaWNhIHPDsyBvIGppdHRlciwgc2UgbsOjbywgZGVpeGEgMQ0KIyAgICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcpKw0KIyAgICAgbGFicyh0aXRsZSA9ICJPeGlnw6puaW8gRGlzc29sdmlkbyBubyBwZXLDrW9kbyAxOTkwLTIwMDAiLA0KIyAgICAgICAgICB4PSJFc3Rhw6fDo28iLA0KIyAgICAgICAgICB5PSJtZy9MIikrDQojICAgICAjIGdlb21faml0dGVyKHdpZHRoID0gLjA3LA0KIyAgICAgIyAgICAgICAgICAgICBhbHBoYT0uMTUsDQojICAgICAjICAgICAgICAgICAgIHNpemU9MS4sDQojICAgICAjICAgICAgICAgICAgIGNvbG9yPSJibGFjayIpKw0KIyAgICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiMgICAgICAgc2l6ZSA9IDEuMiwNCiMgICAgICAgYWxwaGEgPSAuMjUsDQojICAgICAgIHdpZHRoID0gLjA3LA0KIyAgICAgKSsNCiMgICAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMCwwKSksDQojICAgICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSAxMSwNCiMgICAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKC0xLDIxKSkrDQojICAgICBzY2FsZV94X2Rpc2NyZXRlKGxpbWl0cyA9IGMoIjg3Mzk4NTAwIiwNCiMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5ODAiLA0KIyAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsDQojICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTUwIiwNCiMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDU1MDAiLA0KIyAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsDQojICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA5OTAwIiksDQojICAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IGMoIlBNMSIsICJQTTIiLCAiUE0zIiwgIlBNNCIsICJQTTUiLCAiUE02IiwgIlBNNyIpDQojICAgICApKw0KIyAgICAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwNCiMgICAgICAgICAgICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KIyAgICAgICAgICAgICAgICAgYWVzKGdyb3VwPTEpLA0KIyAgICAgICAgICAgICAgICAgYWxwaGE9LjUsDQojICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUsDQojICAgICAgICAgICAgICAgICBzaXplID0gMSkrDQojICAgICAjIGdlb21fbGluZSgNCiMgICAgICMgICBhZXMoY29sb3I9InJlZCIpLA0KIyAgICAgIyAgIGFscGhhPS4wKSsNCiMgICAgICMgc2NhbGVfY29sb3JfbWFudWFsKCJMZWdlbmRhIiwNCiMgICAgICMgICAgICAgICAgICAgICAgICAgIGd1aWRlPSJsZWdlbmQiLA0KIyAgICAgIyAgICAgICAgICAgICAgICAgICAgdmFsdWVzID0gYygiQ2xhc3NlIDEiPSIjOGRjZGViIiwNCiMgICAgICMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIkNsYXNzZSAyIj0iIzcwYzE4YyIsDQojICAgICAjICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICJDbGFzc2UgMyI9IiNmY2Y3YWIiLA0KIyAgICAgIyAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiQ2xhc3NlIDQiPSIjZWI1NjYxIiwNCiMgICAgICMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIlBpb3IgQ2xhc3NlIj0iI2FjNTA3OSIpKSsNCiMgICAgICMgZ3VpZGVzKGNvbG9yPWd1aWRlX2xlZ2VuZChvdmVycmlkZS5hZXMgPSBsaXN0KGxpbmV0eXBlPWMoMSwxLDEsMSwxKSwNCiMgICAjICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBsd2Q9YygyLDIsMiwyLDIpLA0KIyAgICMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHNoYXBlPWMoTkEsTkEsTkEsTkEsTkEpLA0KIyAgICMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGFscGhhPTEpKSkrDQojICAgdGhlbWUoDQojICAgICBwbG90LnRpdGxlID0gZWxlbWVudF90ZXh0KHNpemUgPSAxOSksDQojICAgICBheGlzLnRpdGxlLnkgPSBlbGVtZW50X3RleHQoc2l6ZSA9IDE1KSwNCiMgICAgIGF4aXMudGV4dC55ID0gZWxlbWVudF90ZXh0KHNpemUgPSAxNyksDQojICAgICBheGlzLnRleHQueCA9IGVsZW1lbnRfdGV4dChzaXplID0gMTcpLA0KIyAgICkNCiMgKQ0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIElRQSBPRCBwZXJpb2RvMSwgZWNobyA9IEZBTFNFLCBtZXNzYWdlPUZBTFNFLCB3YXJuaW5nPUZBTFNFfQ0KKGlxYW9kX3AxIDwtZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUgDQogICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEEgPiAiMTk5MCIgJg0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBBTk9fQ09MRVRBIDw9ICIyMDAwIiksDQogICAgICAgICAgICAgICAgICAgYWVzKENPRElHTywNCiAgICAgICAgICAgICAgICAgICAgICAgSVFBX09ELCBuYS5ybSA9IFRSVUUpKSsNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49LUluZiwNCiAgICAgICAgICAgICB5bWF4PTE5LA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iI2FjNTA3OSIpKyAjPnBpb3IgY2xhc3NlDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTE5LA0KICAgICAgICAgICAgIHltYXg9MzYsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjZWI1NjYxIikrICNjbGFzc2UgNA0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj0zNiwNCiAgICAgICAgICAgICB5bWF4PTUxLA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iI2ZjZjdhYiIpKyAjY2xhc3NlIDMNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49NTEsDQogICAgICAgICAgICAgeW1heD03OSwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiM3MGMxOGMiKSsgI2NsYXNzZSAyDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTc5LA0KICAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iIzhkY2RlYiIpKyAjY2xhc3NlIDENCiAgICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgIHdpZHRoPTAuMywNCiAgICAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuNjUpLA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpKw0KICAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcsDQogICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSkrDQogICAgbGFicyh0aXRsZSA9ICJWYXJpYcOnw6NvIGRvIElRQSBwYXJhIG8gcGFyw6JtZXRybyBPeGlnw6puaW8gRGlzc29sdmlkbyAxOTkwLTIwMDAiLA0KICAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgIHk9IiIpKw0KICAgIGdnYmVlc3dhcm06Omdlb21fcXVhc2lyYW5kb20oDQogICAgICAgc2l6ZSA9IDEuMiwNCiAgICAgICBhbHBoYSA9IC4yNSwNCiAgICAgICB3aWR0aCA9IC4wNywNCiAgICApKw0KICAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTgwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA1NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IGMoIlBNMSIsICJQTTIiLCAiUE0zIiwgIlBNNCIsICJQTTUiLCAiUE02IiwgIlBNNyIpDQogICAgKSsNCiAgICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAsMCkpLA0KICAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDYsDQogICAgICAgICAgICAgICAgICAgICAgIGxpbWl0cyA9IGMoLTEsMTAxKSkrDQogICAgZ2VvbV9zbW9vdGgoDQogICAgICAgbWV0aG9kID0gImxtIiwNCiAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgYWxwaGE9LjUsDQogICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgIHNpemUgPSAxDQogICAgKSsNCiAgICB0aGVtZV9ncmFmcygpDQopDQpgYGANCg0KYGBge3IgR3LDoWZpY28gSVFBIE9EIHBlcmlvZG8yLCBlY2hvID0gRkFMU0UsIHdhcm5pbmc9IEZBTFNFLCBtZXNzYWdlID0gRkFMU0V9DQooaXFhb2RfcDIgPC1nZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQU5PX0NPTEVUQSA+ICIyMDAwIiAmDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIEFOT19DT0xFVEEgPD0gIjIwMTAiKSwNCiAgICAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICAgICBJUUFfT0QsIG5hLnJtID0gVFJVRSkpKw0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj0tSW5mLA0KICAgICAgICAgICAgIHltYXg9MTksDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MTksDQogICAgICAgICAgICAgeW1heD0zNiwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiNlYjU2NjEiKSsgI2NsYXNzZSA0DQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTM2LA0KICAgICAgICAgICAgIHltYXg9NTEsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjZmNmN2FiIikrICNjbGFzc2UgMw0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj01MSwNCiAgICAgICAgICAgICB5bWF4PTc5LA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iIzcwYzE4YyIpKyAjY2xhc3NlIDINCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49NzksDQogICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSksDQogICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSkrDQogICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgICBjb2xvcj0iYmxhY2siLA0KICAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICAgd2lkdGg9IDAuNywNCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSsNCiAgICBsYWJzKHRpdGxlID0gIlZhcmlhw6fDo28gZG8gSVFBIHBhcmEgbyBwYXLDom1ldHJvIE94aWfDqm5pbyBEaXNzb2x2aWRvIDIwMDAtMjAxMCIsDQogICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICAgeT0iIikrDQogICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgICBzaXplID0gMS4yLA0KICAgICAgIGFscGhhID0gLjI1LA0KICAgICAgIHdpZHRoID0gLjA3LA0KICAgICkrDQogICAgc2NhbGVfeV9jb250aW51b3VzKGV4cGFuZCA9IGV4cGFuc2lvbihtdWx0ID0gYygwLDApKSwNCiAgICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSA2LA0KICAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKC0xLDEwMSkpKw0KICAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTgwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA1NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IGMoIlBNMSIsICJQTTIiLCAiUE0zIiwgIlBNNCIsICJQTTUiLCAiUE02IiwgIlBNNyIpDQogICAgKSsNCiAgICBnZW9tX3Ntb290aCgNCiAgICAgICBtZXRob2QgPSAibG0iLA0KICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICBhbHBoYT0uNSwNCiAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgc2l6ZSA9IDENCiAgICApKw0KICAgIHRoZW1lX2dyYWZzKCkNCikNCg0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIElRQSBPRCBwZXJpb2RvMywgZWNobyA9IEZBTFNFLCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlID0gRkFMU0V9DQooaXFhb2RfcDMgPC1nZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQU5PX0NPTEVUQSA+ICIyMDEwIiAmDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIEFOT19DT0xFVEEgPD0gIjIwMjAiKSwNCiAgICAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICAgICBJUUFfT0QsIG5hLnJtID0gVFJVRSkpKw0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj0tSW5mLA0KICAgICAgICAgICAgIHltYXg9MTksDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MTksDQogICAgICAgICAgICAgeW1heD0zNiwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiNlYjU2NjEiKSsgI2NsYXNzZSA0DQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTM2LA0KICAgICAgICAgICAgIHltYXg9NTEsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjZmNmN2FiIikrICNjbGFzc2UgMw0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj01MSwNCiAgICAgICAgICAgICB5bWF4PTc5LA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iIzcwYzE4YyIpKyAjY2xhc3NlIDINCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49NzksDQogICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSksDQogICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSkrDQogICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgICBjb2xvcj0iYmxhY2siLA0KICAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICAgd2lkdGg9IDAuNywNCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSsNCiAgICBsYWJzKHRpdGxlID0gIlZhcmlhw6fDo28gZG8gSVFBIHBhcmEgbyBwYXLDom1ldHJvIE94aWfDqm5pbyBEaXNzb2x2aWRvIDIwMTAtMjAyMCIsDQogICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICAgeT0iIikrDQogICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgICBzaXplID0gMS4yLA0KICAgICAgIGFscGhhID0gLjI1LA0KICAgICAgIHdpZHRoID0gLjA3LA0KICAgICkrDQogICAgc2NhbGVfeV9jb250aW51b3VzKGV4cGFuZCA9IGV4cGFuc2lvbihtdWx0ID0gYygwLDApKSwNCiAgICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSA2LA0KICAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKC0xLDEwMSkpKw0KICAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTgwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA1NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IGMoIlBNMSIsICJQTTIiLCAiUE0zIiwgIlBNNCIsICJQTTUiLCAiUE02IiwgIlBNNyIpDQogICAgKSsNCiAgICBnZW9tX3Ntb290aCgNCiAgICAgICBtZXRob2QgPSAibG0iLA0KICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICBhbHBoYT0uNSwNCiAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgc2l6ZSA9IDENCiAgICApKw0KICAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBPRF9JUUEgNiBwZXJpb2RvcyBqdW50b3MsIHdhcm5pbmc9RkFMU0UsIG1lc3NhZ2U9RkFMU0V9DQpncmlkLmFycmFuZ2UoaXFhb2RfcDEsIGlxYW9kX3AyLCBpcWFvZF9wMywgbmNvbCA9IDMpDQpgYGANCg0KYGBge3IgU3Vtw6FyaW8gT0QsIGVjaG8gPSBGQUxTRSwgd2FybmluZz1GQUxTRSwgbWVzc2FnZSA9IEZBTFNFLH0NCihzdW1fb2RfcDEgPC0gcGxhbl93aWRlXzE5OTAyMDIwICU+JQ0KICAgIHNlbGVjdChDT0RJR08sIG94aWdlbmlvX2Rpc3NvbHZpZG8sIEFOT19DT0xFVEEpICU+JSANCiAgICBmaWx0ZXIoQU5PX0NPTEVUQSA+ICIxOTkwIiAmDQogICAgICAgICAgICAgQU5PX0NPTEVUQSA8PSAiMjAwMCIpICU+JSANCiAgIGdyb3VwX2J5KENPRElHTykgJT4lIA0KICAgIyBDT0RJR08gPT0gIjg3Mzk4NTAwIiA8LSAidGVzdGUxIg0KICAgICMgJT4lIA0KIHN1bW1hcml6ZSgNCiAgICAgICBtYXggPSANCiAgICAgICAgICBtYXgob3hpZ2VuaW9fZGlzc29sdmlkbywgbmEucm0gPSBUUlVFKSwNCiAgICAgICBxMyA9IA0KICAgICAgICAgIHF1YW50aWxlKG94aWdlbmlvX2Rpc3NvbHZpZG8sIDAuNzUsIG5hLnJtID0gVFJVRSksDQogICAgICAgbWVkaWFuID0gDQogICAgICAgICAgbWVkaWFuKG94aWdlbmlvX2Rpc3NvbHZpZG8sIG5hLnJtID0gVFJVRSksDQogICAgICAgbWVhbiA9IA0KICAgICAgICAgIG1lYW4ob3hpZ2VuaW9fZGlzc29sdmlkbywgbmEucm09IFRSVUUpLA0KICAgICAgIHExID0gDQogICAgICAgICAgcXVhbnRpbGUob3hpZ2VuaW9fZGlzc29sdmlkbywgMC4yNSwgbmEucm0gPSBUUlVFKSwNCiAgICAgICBtaW4gPSANCiAgICAgICAgICBtaW4ob3hpZ2VuaW9fZGlzc29sdmlkbywgbmEucm0gPSBUUlVFKSwNCiAgICAgICBuID0gDQogICAgICAgICAgbGVuZ3RoKG94aWdlbmlvX2Rpc3NvbHZpZG8pDQogICAgKSAlPiUgDQogICAgcGl2b3RfbG9uZ2VyKA0KICAgICAgICFDT0RJR08sDQogICAgICAgbmFtZXNfdG8gPSAicGFyIiwNCiAgICAgICB2YWx1ZXNfdG8gPSAidmFsb3IiDQogICAgKSAlPiUgDQogICAgcGl2b3Rfd2lkZXIobmFtZXNfZnJvbSA9IENPRElHTywNCiAgICAgICAgICAgICAgICB2YWx1ZXNfZnJvbSA9IHZhbG9yKSAlPiUgDQogICByZW5hbWUoDQogICAgICJQTTEiID0gIjg3Mzk4NTAwIiwNCiAgICAgIlBNMiIgPSAiODczOTg5MDAiLA0KICAgICAiUE0zIiA9ICI4NzM5ODk1MCIsDQogICAgICJQTTQiID0gIjg3Mzk4OTgwIiwNCiAgICAgIlBNNSIgPSAiODc0MDU1MDAiLA0KICAgICAiUE02IiA9ICI4NzQwNjkwMCIsDQogICAgICJQTTciID0gIjg3NDA5OTAwIg0KICAgKSANCiApDQoNCiMgdGVzdGUxIDwtIHBhcmFtZXRyb3NfSVFBICU+JSANCiMgICBncm91cF9ieShDT0RJR08pICU+JSANCiMgICBwaXZvdF9sb25nZXIoDQojICAgICAhQ09ESUdPLA0KIyAgICAgbmFtZXNfdG8gPSAicGFyYW1ldHJvIiwNCiMgICAgIHZhbHVlc190byA9ICJ2YWxvciINCiMgICApICU+JSANCiMgICAjIGdyb3VwX2J5KHBhcmFtZXRybykNCiMgICBwaXZvdF93aWRlcigNCiMgICAgIG5hbWVzX2Zyb20gPSBDT0RJR08sDQojICAgICB2YWx1ZXNfZnJvbSA9IHZhbG9yLA0KIyAgICAgIyAuZ3JvdXBzID0gImRyb3AiDQojICAgKSAlPiUgDQojICAgcmVuYW1lKA0KIyAgICAgIlBNMSIgPSAiODczOTg1MDAiLA0KIyAgICAgIlBNMiIgPSAiODczOTg5MDAiLA0KIyAgICAgIlBNMyIgPSAiODczOTg5NTAiLA0KIyAgICAgIlBNNCIgPSAiODczOTg5ODAiLA0KIyAgICAgIlBNNSIgPSAiODc0MDU1MDAiLA0KIyAgICAgIlBNNiIgPSAiODc0MDY5MDAiLA0KIyAgICAgIlBNNyIgPSAiODc0MDk5MDAiDQojICAgKSAlPiUNCiMgICBzZWxlY3QocGFyLCBQTTEsIFBNMiwgUE0zLCBQTTQsIFBNNSwgUE02LCBQTTcpICU+JSANCiMgICBmaWx0ZXIoDQojICAgICBwYXIgPT0gInBIIg0KIyAgICkgDQojICU+JSANCiMgICB1bm5lc3QoZHBseXI6OmV2ZXJ5dGhpbmcoKSkNCg0KDQojIHRlc3RlMSRQTTFbMl0NCg0KIyAlPiUNCiMgICBzdW1tYXJpemUoDQojICAgICBtYXggPQ0KIyAgICAgICBtYXgob3hpZ2VuaW9fZGlzc29sdmlkbywgbmEucm0gPSBUUlVFKSwNCiMgICAgIHEzID0NCiMgICAgICAgcXVhbnRpbGUob3hpZ2VuaW9fZGlzc29sdmlkbywgMC43NSwgbmEucm0gPSBUUlVFKSwNCiMgICAgIG1lZGlhbiA9DQojICAgICAgIG1lZGlhbihveGlnZW5pb19kaXNzb2x2aWRvLCBuYS5ybSA9IFRSVUUpLA0KIyAgICAgbWVhbiA9DQojICAgICAgIG1lYW4ob3hpZ2VuaW9fZGlzc29sdmlkbywgbmEucm09IFRSVUUpLA0KIyAgICAgcTEgPQ0KIyAgICAgICBxdWFudGlsZShveGlnZW5pb19kaXNzb2x2aWRvLCAwLjI1LCBuYS5ybSA9IFRSVUUpLA0KIyAgICAgbWluID0NCiMgICAgICAgbWluKG94aWdlbmlvX2Rpc3NvbHZpZG8sIG5hLnJtID0gVFJVRSksDQojICAgICBuID0NCiMgICAgICAgbGVuZ3RoKG94aWdlbmlvX2Rpc3NvbHZpZG8pDQojICAgICApDQojICMgICAgIA0KIyANCiMgc3VtKHN1bV9vZF9wMSRuKQ0KDQoNCg0KKHN1bV9vZF9wMiA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgICBzZWxlY3QoQ09ESUdPLCBveGlnZW5pb19kaXNzb2x2aWRvLCBBTk9fQ09MRVRBKSAlPiUgDQogICAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMjAwMCIgJg0KICAgICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDEwIikgJT4lIA0KICAgICAgZ3JvdXBfYnkoQ09ESUdPKSAlPiUgDQogICAgICBzdW1tYXJpemUoDQogICAgICAgICBtaW4gPSANCiAgICAgICAgICAgIG1pbihveGlnZW5pb19kaXNzb2x2aWRvLCBuYS5ybSA9IFRSVUUpLA0KICAgICAgICAgcTEgPSANCiAgICAgICAgICAgIHF1YW50aWxlKG94aWdlbmlvX2Rpc3NvbHZpZG8sIDAuMjUsIG5hLnJtID0gVFJVRSksDQogICAgICAgICBtZWRpYW4gPSANCiAgICAgICAgICAgIG1lZGlhbihveGlnZW5pb19kaXNzb2x2aWRvLCBuYS5ybSA9IFRSVUUpLA0KICAgICAgICAgbWVhbiA9IA0KICAgICAgICAgICAgbWVhbihveGlnZW5pb19kaXNzb2x2aWRvLCBuYS5ybT0gVFJVRSksDQogICAgICAgICBxMyA9IA0KICAgICAgICAgICAgcXVhbnRpbGUob3hpZ2VuaW9fZGlzc29sdmlkbywgMC43NSwgbmEucm0gPSBUUlVFKSwNCiAgICAgICAgIG1heCA9IA0KICAgICAgICAgICAgbWF4KG94aWdlbmlvX2Rpc3NvbHZpZG8sIG5hLnJtID0gVFJVRSkNCiAgICAgICkNCikNCg0KKHN1bV9vZF9wMyA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgICBzZWxlY3QoQ09ESUdPLCBveGlnZW5pb19kaXNzb2x2aWRvLCBBTk9fQ09MRVRBKSAlPiUgDQogICAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMjAxMCIgJg0KICAgICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDIwIikgJT4lIA0KICAgICAgZ3JvdXBfYnkoQ09ESUdPKSAlPiUgDQogICAgICBzdW1tYXJpemUoDQogICAgICAgICBtaW4gPSANCiAgICAgICAgICAgIG1pbihveGlnZW5pb19kaXNzb2x2aWRvLCBuYS5ybSA9IFRSVUUpLA0KICAgICAgICAgcTEgPSANCiAgICAgICAgICAgIHF1YW50aWxlKG94aWdlbmlvX2Rpc3NvbHZpZG8sIDAuMjUsIG5hLnJtID0gVFJVRSksDQogICAgICAgICBtZWRpYW4gPSANCiAgICAgICAgICAgIG1lZGlhbihveGlnZW5pb19kaXNzb2x2aWRvLCBuYS5ybSA9IFRSVUUpLA0KICAgICAgICAgbWVhbiA9IA0KICAgICAgICAgICAgbWVhbihveGlnZW5pb19kaXNzb2x2aWRvLCBuYS5ybT0gVFJVRSksDQogICAgICAgICBxMyA9IA0KICAgICAgICAgICAgcXVhbnRpbGUob3hpZ2VuaW9fZGlzc29sdmlkbywgMC43NSwgbmEucm0gPSBUUlVFKSwNCiAgICAgICAgIG1heCA9IA0KICAgICAgICAgICAgbWF4KG94aWdlbmlvX2Rpc3NvbHZpZG8sIG5hLnJtID0gVFJVRSkNCiAgICAgICkNCikNCg0KIyAgIHBpdm90X3dpZGVyKGlkX2NvbHMgPSBDT0RJR08sDQojICAgICAgICAgICAgICAgbmFtZXNfZnJvbSA9IENPRElHTywNCiMgICAgICAgICAgICAgICB2YWx1ZXNfZnJvbSA9IG94aWdlbmlvX2Rpc3NvbHZpZG8pDQojIA0KIyANCiMgICBncm91cF9ieShDT0RJR08pICU+JQ0KIyAgIGdldF9zdW1tYXJ5X3N0YXRzKHR5cGUgPSAiY29tbW9uIikgJT4lDQojICAgcGl2b3Rfd2lkZXIoaWRfY29scyA9IHZhcmlhYmxlLA0KIyAgICAgICAgICAgICAgIG5hbWVzX2Zyb20gPSBDT0RJR08sDQojICAgICAgICAgICAgICAgdmFsdWVzX2Zyb20gPSB2YXJpYWJsZSRveGlnZW5pb19kaXNzb2x2aWRvKQ0KIyANCiMgIyBpbnN0YWxsLnBhY2thZ2VzKCJnZ3B1YnIiKQ0KIyAjIGxpYnJhcnkoZ2dwdWJyKQ0KYGBgDQoNCiMjIyBEZW1hbmRhIEJpb3F1w61taWNhIGRlIE94aWfDqm5pbw0KDQpgYGB7ciBHcsOhZmljbyBEQk8gZmFjZXR0ZWQsIGZpZy5jYXA9IkRlbWFuZGEgQmlvcXXDrW1pY2EgZGUgT3hpZ8OqbmlvIG5vIHBlcsOtb2RvIDE5OTAtMjAyMCJ9DQooZGJvIDwtIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAsDQogICAgICAgICAgICAgICBhZXMoeCA9IENPRElHTywNCiAgICAgICAgICAgICAgICAgICB5ID0gREJPKSkrDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49MTAsDQogICAgICAgICAgICB5bWF4PUluZiwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj01LA0KICAgICAgICAgICAgeW1heD0xMCwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjZmNmN2FiIikrICNjbGFzc2UgMw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTMsDQogICAgICAgICAgICB5bWF4PTUsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iIzcwYzE4YyIpKyAjY2xhc3NlIDINCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0wLA0KICAgICAgICAgICAgeW1heD0zLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSkrDQogICBnZW9tX2JveHBsb3QoZmlsbD0nI0Y4RjhGRicsDQogICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICB3aWR0aD0gMC43KSsNCiAgIGZhY2V0X3dyYXAofnBlcmlvZG8pKw0KICAgbGFicyh0aXRsZSA9ICJEZW1hbmRhIEJpb3F1w61taWNhIGRlIE94aWfDqm5pbyBubyBwZXLDrW9kbyAxOTkwLTIwMjAiLA0KICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICB5PSJtZy9MIikrDQogICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICBzaXplID0gMS4yLA0KICAgICBhbHBoYSA9IC4yNSwNCiAgICAgd2lkdGggPSAuMDcsDQogICApKw0KICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgKSsNCiAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMC4wMywwLjAzKSksDQogICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSA4LA0KICAgICAgICAgICAgICAgICAgICAgIGxpbWl0cyA9IGMoMSwxMDApLA0KICAgICAgICAgICAgICAgICAgICAgIHRyYW5zID0gImxvZzEwIikrDQogICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgICAgICAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSwNCiAgICAgICAgICAgICAgIHNpemUgPSAxKSsNCiAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBEQk8gcGVyw61vZG8xLCBlY2hvID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKGRib19wMTwtZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUgDQogICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEE+IjE5OTAiICYNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMDAiKSwNCiAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICBEQk8pKSsNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MTAsDQogICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49NSwNCiAgICAgICAgICAgICB5bWF4PTEwLA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iI2ZjZjdhYiIpKyAjY2xhc3NlIDMNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MywNCiAgICAgICAgICAgICB5bWF4PTUsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjNzBjMThjIikrICNjbGFzc2UgMg0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj0wLA0KICAgICAgICAgICAgIHltYXg9MywNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICAgc3RhdF9ib3hwbG90KGdlb20gPSAnZXJyb3JiYXInLA0KICAgICAgICAgICAgICAgICB3aWR0aD0wLjMsDQogICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSkrDQogICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgICBjb2xvcj0iYmxhY2siLA0KICAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICAgd2lkdGg9IDAuNykrDQogICAgbGFicyh0aXRsZSA9ICJEZW1hbmRhIEJpb3F1w61taWNhIGRlIE94aWfDqm5pbyBubyBwZXLDrW9kbyAxOTkwLTIwMDAiLA0KICAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgIHk9Im1nL0wiKSsNCiAgICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICAgIHNpemUgPSAxLjIsDQogICAgICAgYWxwaGEgPSAuMjUsDQogICAgICAgd2lkdGggPSAuMDcsDQogICAgKSsNCiAgICBzY2FsZV94X2Rpc2NyZXRlKGxpbWl0cyA9IGMoIjg3Mzk4NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTUwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA5OTAwIiksDQogICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgICkrDQogICAgc2NhbGVfeV9jb250aW51b3VzKGV4cGFuZCA9IGV4cGFuc2lvbihtdWx0ID0gYygwLjAzLDAuMDMpKSwNCiAgICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSA4LA0KICAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKDEsMTAwKSwNCiAgICAgICAgICAgICAgICAgICAgICAgdHJhbnMgPSAibG9nMTAiKSsNCiAgICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBEQk8gcGVyw61vZG8yLCBlY2hvID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKGRib19wMjwtZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUgDQogICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMDAiICYNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMTAiKSwNCiAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICBEQk8pKSsNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MTAsDQogICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49NSwNCiAgICAgICAgICAgICB5bWF4PTEwLA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjZmNmN2FiIikrICNjbGFzc2UgMw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTMsDQogICAgICAgICAgICB5bWF4PTUsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iIzcwYzE4YyIpKyAjY2xhc3NlIDINCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0wLA0KICAgICAgICAgICAgeW1heD0zLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSkrDQogICBnZW9tX2JveHBsb3QoZmlsbD0nI0Y4RjhGRicsDQogICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICB3aWR0aD0gMC43KSsNCiAgIGxhYnModGl0bGUgPSAiRGVtYW5kYSBCaW9xdcOtbWljYSBkZSBPeGlnw6puaW8gbm8gcGVyw61vZG8gMjAwMC0yMDEwIiwNCiAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgeT0ibWcvTCIpKw0KICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgc2l6ZSA9IDEuMiwNCiAgICAgYWxwaGEgPSAuMjUsDQogICAgIHdpZHRoID0gLjA3LA0KICAgKSsNCiAgICBzY2FsZV94X2Rpc2NyZXRlKGxpbWl0cyA9IGMoIjg3Mzk4NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTUwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA5OTAwIiksDQogICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgICkrDQogICAgc2NhbGVfeV9jb250aW51b3VzKGV4cGFuZCA9IGV4cGFuc2lvbihtdWx0ID0gYygwLjAzLDAuMDMpKSwNCiAgICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSA4LA0KICAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKDEsMTAwKSwNCiAgICAgICAgICAgICAgICAgICAgICAgdHJhbnMgPSAibG9nMTAiKSsNCiAgICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBEQk8gcGVyw61vZG8zLCBlY2hvID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKGRib19wMzwtZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUgDQogICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMTAiICYNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMjAiKSwNCiAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICBEQk8sIG5hLnJtPVRSVUUpKSsNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MTAsDQogICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49NSwNCiAgICAgICAgICAgICB5bWF4PTEwLA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iI2ZjZjdhYiIpKyAjY2xhc3NlIDMNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MywNCiAgICAgICAgICAgICB5bWF4PTUsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjNzBjMThjIikrICNjbGFzc2UgMg0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj0wLA0KICAgICAgICAgICAgIHltYXg9MywNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICAgc3RhdF9ib3hwbG90KGdlb20gPSAnZXJyb3JiYXInLA0KICAgICAgICAgICAgICAgICB3aWR0aD0wLjMsDQogICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSkrDQogICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgICBjb2xvcj0iYmxhY2siLA0KICAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICAgd2lkdGg9IDAuNykrDQogICAgbGFicyh0aXRsZSA9ICJEZW1hbmRhIEJpb3F1w61taWNhIGRlIE94aWfDqm5pbyBubyBwZXLDrW9kbyAyMDEwLTIwMjAiLA0KICAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgIHk9Im1nL0wiKSsNCiAgICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICAgIHNpemUgPSAxLjIsDQogICAgICAgYWxwaGEgPSAuMjUsDQogICAgICAgd2lkdGggPSAuMDcsDQogICAgKSsNCiAgICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAuMDMsMC4wMykpLA0KICAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDgsDQogICAgICAgICAgICAgICAgICAgICAgIGxpbWl0cyA9IGMoMSwxMDApLA0KICAgICAgICAgICAgICAgICAgICAgICB0cmFucyA9ICJsb2cxMCIpKw0KICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgKSsNCiAgICAgICAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwNCiAgICAgICAgICAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICAgICAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgICAgICAgICAgYWxwaGE9LjUsDQogICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgICAgICAgICAgIHNpemUgPSAxKSsNCiAgICB0aGVtZV9ncmFmcygpDQopDQpgYGANCg0KYGBge3IgR3LDoWZpY28gSVFBIERCTyBwZXJpb2RvMSwgZWNobyA9IEZBTFNFLCB3YXJuaW5nID0gRkFMU0UsIG1lc3NhZ2UgPSBGQUxTRX0NCihpcWFfZGJvMTwtZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUgDQogICAgICAgICAgICAgICAgICAgIGZpbHRlcihBTk9fQ09MRVRBPiIxOTkwIiAmDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDAwIiksDQogICAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICAgIElRQV9EQk8pKSsNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0tSW5mLA0KICAgICAgICAgICAgeW1heD0xOSwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0xOSwNCiAgICAgICAgICAgIHltYXg9MzYsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2ViNTY2MSIpKyAjY2xhc3NlIDQNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0zNiwNCiAgICAgICAgICAgIHltYXg9NTEsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2ZjZjdhYiIpKyAjY2xhc3NlIDMNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj01MSwNCiAgICAgICAgICAgIHltYXg9NzksDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iIzcwYzE4YyIpKyAjY2xhc3NlIDINCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj03OSwNCiAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxKSkNCiAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICB3aWR0aD0wLjMsDQogICAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuNjUpLA0KICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSkrDQogICBnZW9tX2JveHBsb3QoZmlsbD0nI0Y4RjhGRicsDQogICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICB3aWR0aD0gMC43KSsNCiAgIGxhYnModGl0bGUgPSAiVmFyaWHDp8OjbyBkbyBJUUEgcGFyYSBvIHBhcsOibWV0cm8gREJPIDE5OTAtMjAyMCIsDQogICAgICAgIHg9IkVzdGHDp8OjbyIsDQogICAgICAgIHk9Im1nL0wiKSsNCiAgIGdnYmVlc3dhcm06Omdlb21fcXVhc2lyYW5kb20oDQogICAgIHNpemUgPSAxLjIsDQogICAgIGFscGhhID0gLjI1LA0KICAgICB3aWR0aCA9IC4wNywNCiAgICkrDQogICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAsMCkpLA0KICAgICAgICAgICAgICAgICAgICAgIG4uYnJlYWtzID0gNiwNCiAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKC0xLDEwMSkpKw0KICAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTgwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA1NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IGMoIlBNMSIsICJQTTIiLCAiUE0zIiwgIlBNNCIsICJQTTUiLCAiUE02IiwgIlBNNyIpDQogICAgKSsNCiAgICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBJUUEgREJPIHBlcmlvZG8yLCBlY2hvID0gRkFMU0UsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKGlxYV9kYm8yPC1nZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwJT4lIA0KICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMDAiICYNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBBTk9fQ09MRVRBPD0iMjAxMCIpLA0KICAgICAgICAgICAgICAgICAgYWVzKENPRElHTywNCiAgICAgICAgICAgICAgICAgICAgICBJUUFfREJPKSkrDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPS1JbmYsDQogICAgICAgICAgICAgeW1heD0xOSwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiNhYzUwNzkiKSsgIz5waW9yIGNsYXNzZQ0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj0xOSwNCiAgICAgICAgICAgICB5bWF4PTM2LA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iI2ViNTY2MSIpKyAjY2xhc3NlIDQNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MzYsDQogICAgICAgICAgICAgeW1heD01MSwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiNmY2Y3YWIiKSsgI2NsYXNzZSAzDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTUxLA0KICAgICAgICAgICAgIHltYXg9NzksDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjNzBjMThjIikrICNjbGFzc2UgMg0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj03OSwNCiAgICAgICAgICAgICB5bWF4PUluZiwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxKSkNCiAgICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgIHdpZHRoPTAuMywNCiAgICAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuNjUpLA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpKw0KICAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcpKw0KICAgIGxhYnModGl0bGUgPSAiVmFyaWHDp8OjbyBkbyBJUUEgcGFyYSBvIHBhcsOibWV0cm8gREJPIDIwMDAtMjAxMCIsDQogICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICAgeT0ibWcvTCIpKw0KICAgIGdnYmVlc3dhcm06Omdlb21fcXVhc2lyYW5kb20oDQogICAgICAgc2l6ZSA9IDEuMiwNCiAgICAgICBhbHBoYSA9IC4yNSwNCiAgICAgICB3aWR0aCA9IC4wNywNCiAgICApKw0KICAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMCwwKSksDQogICAgICAgICAgICAgICAgICAgICAgIG4uYnJlYWtzID0gNiwNCiAgICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYygtMSwxMDEpKSsNCiAgICBzY2FsZV94X2Rpc2NyZXRlKGxpbWl0cyA9IGMoIjg3Mzk4NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTUwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA5OTAwIiksDQogICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgICkrDQogICAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwNCiAgICAgICAgICAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICAgICAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgICAgICAgICAgYWxwaGE9LjUsDQogICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgICAgICAgICAgIHNpemUgPSAxKSsNCiAgICB0aGVtZV9ncmFmcygpDQopDQpgYGANCg0KYGBge3IgR3LDoWZpY28gSVFBIERCTyBwZXJpb2RvMywgZWNobyA9IEZBTFNFLCB3YXJuaW5nID0gRkFMU0UsIG1lc3NhZ2UgPSBGQUxTRX0NCihpcWFfZGJvMzwtZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCU+JSANCiAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihBTk9fQ09MRVRBPiIyMDEwIiAmDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMjAiKSwNCiAgICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICAgSVFBX0RCTykpKw0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj0tSW5mLA0KICAgICAgICAgICAgIHltYXg9MTksDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MTksDQogICAgICAgICAgICAgeW1heD0zNiwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiNlYjU2NjEiKSsgI2NsYXNzZSA0DQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTM2LA0KICAgICAgICAgICAgIHltYXg9NTEsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjZmNmN2FiIikrICNjbGFzc2UgMw0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj01MSwNCiAgICAgICAgICAgICB5bWF4PTc5LA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iIzcwYzE4YyIpKyAjY2xhc3NlIDINCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49NzksDQogICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMSkpDQogICAgc3RhdF9ib3hwbG90KGdlb20gPSAnZXJyb3JiYXInLA0KICAgICAgICAgICAgICAgICB3aWR0aD0wLjMsDQogICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSwNCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSsNCiAgICBnZW9tX2JveHBsb3QoZmlsbD0nI0Y4RjhGRicsDQogICAgICAgICAgICAgICAgIGNvbG9yPSJibGFjayIsDQogICAgICAgICAgICAgICAgIG91dGxpZXIuc2hhcGUgPSBOQSwgI3NlIGRlaXhhciBOQSBmaWNhIHPDsyBvIGppdHRlciwgc2UgbsOjbywgZGVpeGEgMQ0KICAgICAgICAgICAgICAgICB3aWR0aD0gMC43KSsNCiAgICBsYWJzKHRpdGxlID0gIlZhcmlhw6fDo28gZG8gSVFBIHBhcmEgbyBwYXLDom1ldHJvIERCTyAyMDEwLTIwMjAiLA0KICAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgIHk9Im1nL0wiKSsNCiAgICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICAgIHNpemUgPSAxLjIsDQogICAgICAgYWxwaGEgPSAuMjUsDQogICAgICAgd2lkdGggPSAuMDcsDQogICAgKSsNCiAgICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAsMCkpLA0KICAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDYsDQogICAgICAgICAgICAgICAgICAgICAgIGxpbWl0cyA9IGMoLTEsMTAxKSkrDQogICBzY2FsZV94X2Rpc2NyZXRlKGxpbWl0cyA9IGMoIjg3Mzk4NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTgwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTUwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA1NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA2OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA5OTAwIiksDQogICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IGMoIlBNMSIsICJQTTIiLCAiUE0zIiwgIlBNNCIsICJQTTUiLCAiUE02IiwgIlBNNyIpDQogICApKw0KICAgICAgICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBEQk8gMyBwZXJpb2RvcyBqdW50b3MsIHdhcm5pbmc9RkFMU0UsIG1lc3NhZ2U9RkFMU0V9DQpncmlkLmFycmFuZ2UoZGJvX3AxLCBkYm9fcDIsIGRib19wMywgbmNvbCA9IDMpDQpgYGANCg0KYGBge3IgU3Vtw6FyaW8gREJPLCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlID0gRkFMU0UsfQ0KKHN1bV9kYm9fcDEgPC0gcGxhbl93aWRlXzE5OTAyMDIwICU+JQ0KICAgc2VsZWN0KENPRElHTywgREJPLCBBTk9fQ09MRVRBKSAlPiUgDQogICBmaWx0ZXIoQU5PX0NPTEVUQT4iMTk5MCIgJg0KICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMDAiKSAlPiUgDQogICBncm91cF9ieShDT0RJR08pICU+JSANCiAgIHN1bW1hcml6ZSgNCiAgICAgbWluID0gDQogICAgICAgbWluKERCTywgDQogICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIHExID0gDQogICAgICAgcXVhbnRpbGUoREJPLCAwLjI1LCANCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICBtZWRpYW4gPSANCiAgICAgICBtZWRpYW4oREJPLCANCiAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgbWVhbiA9IA0KICAgICAgIG1lYW4oREJPLCANCiAgICAgICAgICAgIG5hLnJtPSBUUlVFKSwNCiAgICAgcTMgPSANCiAgICAgICBxdWFudGlsZShEQk8sIDAuNzUsIA0KICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIG1heCA9IA0KICAgICAgIG1heChEQk8sIA0KICAgICAgICAgICBuYS5ybSA9IFRSVUUpKQ0KKQ0KDQooc3VtX2Rib19wMiA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgc2VsZWN0KENPRElHTywgREJPLCBBTk9fQ09MRVRBKSAlPiUgDQogICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMDAiICYNCiAgICAgICAgICAgICBBTk9fQ09MRVRBPD0iMjAxMCIpICU+JSANCiAgICBncm91cF9ieShDT0RJR08pICU+JSANCiAgICBzdW1tYXJpemUoDQogICAgICBtaW4gPSANCiAgICAgICAgbWluKERCTywgDQogICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgcTEgPSANCiAgICAgICAgcXVhbnRpbGUoREJPLCAwLjI1LCANCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lZGlhbiA9IA0KICAgICAgICBtZWRpYW4oREJPLCANCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBtZWFuID0gDQogICAgICAgIG1lYW4oREJPLCANCiAgICAgICAgICAgICBuYS5ybT0gVFJVRSksDQogICAgICBxMyA9IA0KICAgICAgICBxdWFudGlsZShEQk8sIDAuNzUsIA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWF4ID0gDQogICAgICAgIG1heChEQk8sIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSkNCikNCg0KKHN1bV9kYm9fcDMgPC0gcGxhbl93aWRlXzE5OTAyMDIwICU+JQ0KICAgIHNlbGVjdChDT0RJR08sIERCTywgQU5PX0NPTEVUQSkgJT4lIA0KICAgIGZpbHRlcihBTk9fQ09MRVRBPiIyMDEwIiAmDQogICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMjAiKSAlPiUgDQogICAgZ3JvdXBfYnkoQ09ESUdPKSAlPiUgDQogICAgc3VtbWFyaXplKA0KICAgICAgbWluID0gDQogICAgICAgIG1pbihEQk8sIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIHExID0gDQogICAgICAgIHF1YW50aWxlKERCTywgMC4yNSwgDQogICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBtZWRpYW4gPSANCiAgICAgICAgbWVkaWFuKERCTywgDQogICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWVhbiA9IA0KICAgICAgICBtZWFuKERCTywgDQogICAgICAgICAgICAgbmEucm09IFRSVUUpLA0KICAgICAgcTMgPSANCiAgICAgICAgcXVhbnRpbGUoREJPLCAwLjc1LCANCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1heCA9IA0KICAgICAgICBtYXgoREJPLCANCiAgICAgICAgICAgIG5hLnJtID0gVFJVRSkpDQopDQpgYGANCg0KYGBge3IgU2FsdmFuZG8gREJPLCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlID0gRkFMU0UsfQ0KZ2dzYXZlKCJkYm8ucG5nIiwNCiAgICAgICB1bml0cyA9IGMoInB4IiksDQogICAgICAgd2lkdGggPSA0NTAwLA0KICAgICAgIGhlaWdodCA9IDI5OTMsDQogICAgICAgcGxvdCA9IGRibywNCiAgICAgICBwYXRoID0gIi4vZ3JhZmljb3MiLA0KICAgICAgIGRwaSA9IDMwMCwNCiAgICAgICB0eXBlID0gImNhaXJvIikNCg0KZ2dzYXZlKCJkYm9fcDEucG5nIiwNCiAgICAgICBwbG90ID0gZGJvX3AxLA0KICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogICAgICAgZHBpID0gMzAwLA0KICAgICAgIHR5cGUgPSAiY2Fpcm8iKQ0KDQpnZ3NhdmUoImRib19wMi5wbmciLA0KICAgICAgIHBsb3QgPSBkYm9fcDIsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgiZGJvX3AzLnBuZyIsDQogICAgICAgcGxvdCA9IGRib19wMywNCiAgICAgICBwYXRoID0gIi4vZ3JhZmljb3MiLA0KICAgICAgIGRwaSA9IDMwMCwNCiAgICAgICB0eXBlID0gImNhaXJvIikNCg0KZ2dzYXZlKCJkYm9fM3BlcmlvZG9zLnBuZyIsDQogICAgICAgdW5pdHMgPSBjKCJweCIpLA0KICAgICAgIHdpZHRoID0gNDUwMCwNCiAgICAgICBoZWlnaHQgPSAyOTkzLA0KICAgICAgIHBsb3QgPSBncmlkLmFycmFuZ2UoZGJvX3AxLCBkYm9fcDIsIGRib19wMywgbmNvbCA9IDMpLA0KICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogICAgICAgZHBpID0gMzAwLA0KICAgICAgIHR5cGUgPSAiY2Fpcm8iKQ0KYGBgDQoNCiMjIyBGw7NzZm9ybyB0b3RhbA0KDQpgYGB7ciBHcsOhZmljbyBmw7NzZm9ybyB0b3RhbCBmYWNldHRlZCwgZmlnLmNhcD0iRsOzc2Zvcm8gdG90YWwgbm8gcGVyw61vZG8gMTk5MC0yMDIwIn0NCihwdG90IDwtIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAsDQogICAgICAgICAgICAgICAgYWVzKENPRElHTywNCiAgICAgICAgICAgICAgICAgICAgZm9zZm9yb190b3RhbCkpKw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTAuMTUsDQogICAgICAgICAgICB5bWF4PUluZiwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0wLjEsDQogICAgICAgICAgICB5bWF4PTAuMTUsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2ZjZjdhYiIpKyAjY2xhc3NlIDMNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0wLA0KICAgICAgICAgICAgeW1heD0wLjEsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iIzhkY2RlYiIpKyAjY2xhc3NlIDENCiAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcpKw0KICBmYWNldF93cmFwKH5wZXJpb2RvKSsNCiAgICBsYWJzKHRpdGxlID0gIkbDs3Nmb3JvIHRvdGFsIG5vIHBlcsOtb2RvIDE5OTAtMjAyMCIsDQogICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICAgeT0ibWcvTCIpKw0KICAgc2NhbGVfeV9jb250aW51b3VzKGV4cGFuZCA9IGV4cGFuc2lvbihtdWx0ID0gYygwLjAzLDAuMDMpKSwNCiAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDgsDQogICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYyhtaW4ocGxhbl93aWRlXzE5OTAyMDIwJGZvc2Zvcm9fdG90YWwsIG5hLnJtID0gVFJVRSksDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBtYXgocGxhbl93aWRlXzE5OTAyMDIwJGZvc2Zvcm9fdG90YWwpLCBuYS5ybSA9IFRSVUUpLA0KICAgICAgICAgICAgICAgICAgICAgIHRyYW5zID0gImxvZzEwIiwNCiAgICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBzY2FsZXM6Om51bWJlcl9mb3JtYXQoYWNjdXJhY3kgPSAuMDAxLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZWNpbWFsLm1hcmsgPSAiLCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGJpZy5tYXJrID0gIiAiKQ0KICAgICAgICAgICAgICAgICAgICAgICkrDQogICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgICBzaXplID0gMS4yLA0KICAgICAgIGFscGhhID0gLjI1LA0KICAgICAgIHdpZHRoID0gLjA3LA0KICAgICkrDQogICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5ODAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDU1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA2OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gYygiUE0xIiwgIlBNMiIsICJQTTMiLCAiUE00IiwgIlBNNSIsICJQTTYiLCAiUE03IikNCiAgICApKw0KICAgIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsDQogICAgICAgICAgICAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgICAgICAgICAgICAgYWVzKGdyb3VwPTEpLA0KICAgICAgICAgICAgICAgIGFscGhhPS41LA0KICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSwNCiAgICAgICAgICAgICAgICBzaXplID0gMSkrDQogICAgdGhlbWVfZ3JhZnMoKQ0KKQ0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIEbDs3Nmb3JvIHRvdGFsIHBlcmlvZG8xLCB3YXJuaW5nID0gRkFMU0UsIG1lc3NhZ2UgPSBGQUxTRX0NCihwdG90X3AxPC1nZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwJT4lIA0KICAgICAgICAgICAgICAgICAgIGZpbHRlcihBTk9fQ09MRVRBPiIxOTkwIiAmDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDAwIiksDQogICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICBmb3Nmb3JvX3RvdGFsKSkrDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTAuMTUsDQogICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MC4xLA0KICAgICAgICAgICAgIHltYXg9MC4xNSwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiNmY2Y3YWIiKSsgI2NsYXNzZSAzDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTAsDQogICAgICAgICAgICAgeW1heD0wLjEsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcpKw0KICAgIGxhYnModGl0bGUgPSAiRsOzc2Zvcm8gdG90YWwgbm8gcGVyw61vZG8gMTk5MC0yMDAwIiwNCiAgICAgICAgIHg9IkVzdGHDp8OjbyIsDQogICAgICAgICB5PSJtZy9MIikrDQogICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgICBzaXplID0gMS4yLA0KICAgICAgIGFscGhhID0gLjI1LA0KICAgICAgIHdpZHRoID0gLjA3LA0KICAgICkrDQogICAgc2NhbGVfeV9jb250aW51b3VzKGV4cGFuZCA9IGV4cGFuc2lvbihtdWx0ID0gYygwLjAzLDAuMDMpKSwNCiAgICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSA4LA0KICAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKG1pbihwbGFuX3dpZGVfMTk5MDIwMjAkZm9zZm9yb190b3RhbCwgbmEucm0gPSBUUlVFKSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBtYXgocGxhbl93aWRlXzE5OTAyMDIwJGZvc2Zvcm9fdG90YWwpLCBuYS5ybSA9IFRSVUUpLA0KICAgICAgICAgICAgICAgICAgICAgICB0cmFucyA9ICJsb2cxMCIpKw0KICAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTgwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA1NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IGMoIlBNMSIsICJQTTIiLCAiUE0zIiwgIlBNNCIsICJQTTUiLCAiUE02IiwgIlBNNyIpDQogICAgKSsNCiAgICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgIHRoZW1lX2dyYWZzKCkNCikNCg0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIEbDs3Nmb3JvIHRvdGFsIHBlcmlvZG8yLCB3YXJuaW5nID0gRkFMU0UsIG1lc3NhZ2UgPSBGQUxTRX0NCihwdG90X3AyIDwtIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAlPiUgDQogICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMDAiICYNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMTAiKSwNCiAgICAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICAgICBmb3Nmb3JvX3RvdGFsKSkrDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTAuMTUsDQogICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MC4xLA0KICAgICAgICAgICAgIHltYXg9MC4xNSwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiNmY2Y3YWIiKSsgI2NsYXNzZSAzDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTAsDQogICAgICAgICAgICAgeW1heD0wLjEsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcpKw0KICAgIGxhYnModGl0bGUgPSAiRsOzc2Zvcm8gdG90YWwgbm8gcGVyw61vZG8gMjAwMC0yMDEwIiwNCiAgICAgICAgIHg9IkVzdGHDp8OjbyIsDQogICAgICAgICB5PSJtZy9MIikrDQogICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAuMDMsMC4wMykpLA0KICAgICAgICAgICAgICAgICAgICAgIG4uYnJlYWtzID0gOCwNCiAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKG1pbihwbGFuX3dpZGVfMTk5MDIwMjAkZm9zZm9yb190b3RhbCwgbmEucm0gPSBUUlVFKSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG1heChwbGFuX3dpZGVfMTk5MDIwMjAkZm9zZm9yb190b3RhbCksIG5hLnJtID0gVFJVRSksDQogICAgICAgICAgICAgICAgICAgICAgdHJhbnMgPSAibG9nMTAiKSsNCiAgICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICAgIHNpemUgPSAxLjIsDQogICAgICAgYWxwaGEgPSAuMjUsDQogICAgICAgd2lkdGggPSAuMDcsDQogICAgKSsNCiAgICBzY2FsZV94X2Rpc2NyZXRlKGxpbWl0cyA9IGMoIjg3Mzk4NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTUwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA5OTAwIiksDQogICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgICkrDQogICAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwNCiAgICAgICAgICAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICAgICAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgICAgICAgICAgYWxwaGE9LjUsDQogICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgICAgICAgICAgIHNpemUgPSAxKSsNCiAgICB0aGVtZV9ncmFmcygpDQopDQoNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBGw7NzZm9ybyB0b3RhbCBwZXJpb2RvMywgd2FybmluZyA9IEZBTFNFLCBtZXNzYWdlID0gRkFMU0V9DQoocHRvdF9wMyA8LSBnZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwJT4lIA0KICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihBTk9fQ09MRVRBPiIyMDEwIiAmDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDIwIiksDQogICAgICAgICAgICAgICAgICAgYWVzKENPRElHTywNCiAgICAgICAgICAgICAgICAgICAgICAgZm9zZm9yb190b3RhbCkpKw0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj0wLjE1LA0KICAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iI2FjNTA3OSIpKyAjPnBpb3IgY2xhc3NlDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTAuMSwNCiAgICAgICAgICAgICB5bWF4PTAuMTUsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjZmNmN2FiIikrICNjbGFzc2UgMw0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj0wLA0KICAgICAgICAgICAgIHltYXg9MC4xLA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iIzhkY2RlYiIpKyAjY2xhc3NlIDENCiAgICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgIHdpZHRoPTAuMywNCiAgICAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuNjUpKSsNCiAgICBnZW9tX2JveHBsb3QoZmlsbD0nI0Y4RjhGRicsDQogICAgICAgICAgICAgICAgIGNvbG9yPSJibGFjayIsDQogICAgICAgICAgICAgICAgIG91dGxpZXIuc2hhcGUgPSBOQSwgI3NlIGRlaXhhciBOQSBmaWNhIHPDsyBvIGppdHRlciwgc2UgbsOjbywgZGVpeGEgMQ0KICAgICAgICAgICAgICAgICB3aWR0aD0gMC43KSsNCiAgICBsYWJzKHRpdGxlID0gIkbDs3Nmb3JvIHRvdGFsIG5vIHBlcsOtb2RvIDIwMTAtMjAyMCIsDQogICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICAgeT0ibWcvTCIpKw0KICAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMC4wMywwLjAzKSksDQogICAgICAgICAgICAgICAgICAgICAgIG4uYnJlYWtzID0gOCwNCiAgICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYyhtaW4ocGxhbl93aWRlXzE5OTAyMDIwJGZvc2Zvcm9fdG90YWwsIG5hLnJtID0gVFJVRSksDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbWF4KHBsYW5fd2lkZV8xOTkwMjAyMCRmb3Nmb3JvX3RvdGFsKSwgbmEucm0gPSBUUlVFKSwNCiAgICAgICAgICAgICAgICAgICAgICAgdHJhbnMgPSAibG9nMTAiKSsNCiAgIGdnYmVlc3dhcm06Omdlb21fcXVhc2lyYW5kb20oDQogICAgIHNpemUgPSAxLjIsDQogICAgIGFscGhhID0gLjI1LA0KICAgICB3aWR0aCA9IC4wNywNCiAgICkrDQogICBzY2FsZV94X2Rpc2NyZXRlKGxpbWl0cyA9IGMoIjg3Mzk4NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTgwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTUwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA1NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA2OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA5OTAwIiksDQogICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IGMoIlBNMSIsICJQTTIiLCAiUE0zIiwgIlBNNCIsICJQTTUiLCAiUE02IiwgIlBNNyIpDQogICApKw0KICAgIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsDQogICAgICAgICAgICAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgICAgICAgICAgICAgYWVzKGdyb3VwPTEpLA0KICAgICAgICAgICAgICAgIGFscGhhPS41LA0KICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSwNCiAgICAgICAgICAgICAgICBzaXplID0gMSkrDQogICAgdGhlbWVfZ3JhZnMoKQ0KKQ0KDQpgYGANCg0KYGBge3IgR3LDoWZpY28gUHRvdCAzIHBlcmlvZG9zIGp1bnRvcywgd2FybmluZz1GQUxTRSwgbWVzc2FnZT1GQUxTRX0NCmdyaWQuYXJyYW5nZShwdG90X3AxLCBwdG90X3AyLCBwdG90X3AzLCBuY29sID0gMykNCmBgYA0KDQpgYGB7ciBTdW3DoXJpbyBGw7NzZm9ybyB0b3RhbCwgd2FybmluZz1GQUxTRSwgbWVzc2FnZSA9IEZBTFNFLH0NCihzdW1fcHRvdF9wMSA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgc2VsZWN0KENPRElHTywgZm9zZm9yb190b3RhbCwgQU5PX0NPTEVUQSkgJT4lIA0KICAgZmlsdGVyKEFOT19DT0xFVEE+IjE5OTAiICYNCiAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDAwIikgJT4lIA0KICAgZ3JvdXBfYnkoQ09ESUdPKSAlPiUgDQogICBzdW1tYXJpemUoDQogICAgIG1pbiA9IA0KICAgICAgIG1pbihmb3Nmb3JvX3RvdGFsLCBuYS5ybSA9IFRSVUUpLA0KICAgICBxMSA9IA0KICAgICAgIHF1YW50aWxlKGZvc2Zvcm9fdG90YWwsIDAuMjUsIG5hLnJtID0gVFJVRSksDQogICAgIG1lZGlhbiA9IA0KICAgICAgIG1lZGlhbihmb3Nmb3JvX3RvdGFsLCBuYS5ybSA9IFRSVUUpLA0KICAgICBtZWFuID0gDQogICAgICAgbWVhbihmb3Nmb3JvX3RvdGFsLCBuYS5ybT0gVFJVRSksDQogICAgIHEzID0gDQogICAgICAgcXVhbnRpbGUoZm9zZm9yb190b3RhbCwgMC43NSwgbmEucm0gPSBUUlVFKSwNCiAgICAgbWF4ID0gDQogICAgICAgbWF4KGZvc2Zvcm9fdG90YWwsIG5hLnJtID0gVFJVRSkpKQ0KDQooc3VtX3B0b3RfcDIgPC0gcGxhbl93aWRlXzE5OTAyMDIwICU+JQ0KICAgIHNlbGVjdChDT0RJR08sIGZvc2Zvcm9fdG90YWwsIEFOT19DT0xFVEEpICU+JSANCiAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMjAwMCIgJg0KICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDEwIikgJT4lIA0KICAgIGdyb3VwX2J5KENPRElHTykgJT4lIA0KICAgIHN1bW1hcml6ZSgNCiAgICAgIG1pbiA9IA0KICAgICAgICBtaW4oZm9zZm9yb190b3RhbCwgbmEucm0gPSBUUlVFKSwNCiAgICAgIHExID0gDQogICAgICAgIHF1YW50aWxlKGZvc2Zvcm9fdG90YWwsIDAuMjUsIG5hLnJtID0gVFJVRSksDQogICAgICBtZWRpYW4gPSANCiAgICAgICAgbWVkaWFuKGZvc2Zvcm9fdG90YWwsIG5hLnJtID0gVFJVRSksDQogICAgICBtZWFuID0gDQogICAgICAgIG1lYW4oZm9zZm9yb190b3RhbCwgbmEucm09IFRSVUUpLA0KICAgICAgcTMgPSANCiAgICAgICAgcXVhbnRpbGUoZm9zZm9yb190b3RhbCwgMC43NSwgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1heCA9IA0KICAgICAgICBtYXgoZm9zZm9yb190b3RhbCwgbmEucm0gPSBUUlVFKSkpDQoNCihzdW1fcHRvdF9wMyA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgc2VsZWN0KENPRElHTywgZm9zZm9yb190b3RhbCwgQU5PX0NPTEVUQSkgJT4lIA0KICAgIGZpbHRlcihBTk9fQ09MRVRBPiIyMDEwIiAmDQogICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMjAiKSAlPiUgDQogICAgZ3JvdXBfYnkoQ09ESUdPKSAlPiUgDQogICAgc3VtbWFyaXplKA0KICAgICAgbWluID0gDQogICAgICAgIG1pbihmb3Nmb3JvX3RvdGFsLCBuYS5ybSA9IFRSVUUpLA0KICAgICAgcTEgPSANCiAgICAgICAgcXVhbnRpbGUoZm9zZm9yb190b3RhbCwgMC4yNSwgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lZGlhbiA9IA0KICAgICAgICBtZWRpYW4oZm9zZm9yb190b3RhbCwgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lYW4gPSANCiAgICAgICAgbWVhbihmb3Nmb3JvX3RvdGFsLCBuYS5ybT0gVFJVRSksDQogICAgICBxMyA9IA0KICAgICAgICBxdWFudGlsZShmb3Nmb3JvX3RvdGFsLCAwLjc1LCBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWF4ID0gDQogICAgICAgIG1heChmb3Nmb3JvX3RvdGFsLCBuYS5ybSA9IFRSVUUpKSkNCg0KYGBgDQoNCmBgYHtyIFNhbHZhbmRvIFB0b3QsIHdhcm5pbmc9RkFMU0UsIG1lc3NhZ2UgPSBGQUxTRSx9DQpnZ3NhdmUoInB0b3QucG5nIiwNCiAgICAgICB1bml0cyA9IGMoInB4IiksDQogICAgICAgd2lkdGggPSA0NTAwLA0KICAgICAgIGhlaWdodCA9IDI5OTMsDQogICAgICAgcGxvdCA9IHB0b3QsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgicHRvdF9wMS5wbmciLA0KICAgICAgIHBsb3QgPSBwdG90X3AxLA0KICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogICAgICAgZHBpID0gMzAwLA0KICAgICAgIHR5cGUgPSAiY2Fpcm8iKQ0KDQpnZ3NhdmUoInB0b3RfcDIucG5nIiwNCiAgICAgICBwbG90ID0gcHRvdF9wMiwNCiAgICAgICBwYXRoID0gIi4vZ3JhZmljb3MiLA0KICAgICAgIGRwaSA9IDMwMCwNCiAgICAgICB0eXBlID0gImNhaXJvIikNCg0KZ2dzYXZlKCJwdG90X3AzLnBuZyIsDQogICAgICAgcGxvdCA9IHB0b3RfcDMsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgicHRvdF8zcGVyaW9kb3MucG5nIiwNCiAgICAgICB1bml0cyA9IGMoInB4IiksDQogICAgICAgd2lkdGggPSA0NTAwLA0KICAgICAgIGhlaWdodCA9IDI5OTMsDQogICAgICAgcGxvdCA9IGdyaWQuYXJyYW5nZShwdG90X3AxLCBwdG90X3AyLCBwdG90X3AzLCBuY29sID0gMyksDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQpgYGANCg0KIyMjIEVzY2hlcmljaGlhIGNvbGkNCg0KYGBge3IgR3LDoWZpY28gRWNvbGkgZmFjZXR0ZWQsIGZpZy5jYXA9IkVzY2hlcmljaGlhLWNvbGktZ3JhdmF0YcOtIG5vIHBlcsOtb2RvIDE5OTAtMjAyMCIsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KZWNvbGlfX2NsYXNzIDwtIGZ1bmN0aW9uKCkgew0KICBsaXN0KGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgICAgeW1pbj0zMjAwLA0KICAgICAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgICAgZmlsbD0iI2FjNTA3OSIpKyAjPnBpb3IgY2xhc3NlDQogICAgICAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICAgICAgIHltaW49ODAwLA0KICAgICAgICAgICAgICAgICAgeW1heD0zMjAwLA0KICAgICAgICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICAgICAgIGZpbGw9IiNmY2Y3YWIiKSsgI2NsYXNzZSAzDQogICAgICAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICAgICAgIHltaW49MTYwLA0KICAgICAgICAgICAgICAgICAgeW1heD04MDAsDQogICAgICAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgICAgICAgZmlsbD0iIzcwYzE4YyIpKyAjY2xhc3NlIDINCiAgICAgICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgICAgICAgeW1pbj0wLA0KICAgICAgICAgICAgICAgICAgeW1heD0xNjAsDQogICAgICAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgICAgICAgZmlsbD0iIzhkY2RlYiIpICNjbGFzc2UgMQ0KICApDQp9DQogIA0KKGVjb2xpIDwtIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAsDQogICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICBFX2NvbGkpKSsNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0zMjAwLA0KICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2FjNTA3OSIpKyAjPnBpb3IgY2xhc3NlDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49ODAwLA0KICAgICAgICAgICAgeW1heD0zMjAwLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNmY2Y3YWIiKSsgI2NsYXNzZSAzDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49MTYwLA0KICAgICAgICAgICAgeW1heD04MDAsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iIzcwYzE4YyIpKyAjY2xhc3NlIDINCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0wLA0KICAgICAgICAgICAgeW1heD0xNjAsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iIzhkY2RlYiIpKyAjY2xhc3NlIDENCiAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICB3aWR0aD0wLjMsDQogICAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuNjUpKSsNCiAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICBjb2xvcj0iYmxhY2siLA0KICAgICAgICAgICAgICAgIG91dGxpZXIuc2hhcGUgPSBOQSwgI3NlIGRlaXhhciBOQSBmaWNhIHPDsyBvIGppdHRlciwgc2UgbsOjbywgZGVpeGEgMQ0KICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcpKw0KICAgZmFjZXRfd3JhcCh+cGVyaW9kbykrDQogICBsYWJzKHRpdGxlID0gIipFc2NoZXJpY2hpYSBjb2xpKiBubyBwZXLDrW9kbyAxOTkwLTIwMjAiLA0KICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICB5PSJOTVAvMTAwbUwiKSsNCiAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMC4wMSwgMC4wMSkpLA0KICAgICAgICAgICAgICAgICAgICAgICMgbi5icmVha3MgPSA5LA0KICAgICAgICAgICAgICAgICAgICAgIG4uYnJlYWtzID0gNiwNCiAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKG1pbihwbGFuX3dpZGVfMTk5MDIwMjAkRV9jb2xpLCBuYS5ybSA9IFRSVUUpLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbWF4KHBsYW5fd2lkZV8xOTkwMjAyMCRFX2NvbGksIG5hLnJtID0gVFJVRSkpLA0KICAgICAgICAgICAgICAgICAgICAgIHRyYW5zID0gImxvZzEwIiwNCiAgICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBzY2FsZXM6Om51bWJlcl9mb3JtYXQoYWNjdXJhY3kgPSAxLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZWNpbWFsLm1hcmsgPSAiLCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGJpZy5tYXJrID0gIiAiKSkrDQogICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICBzaXplID0gMS4yLA0KICAgICBhbHBoYSA9IC4yNSwNCiAgICAgd2lkdGggPSAuMDcsDQogICApKw0KICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgKSsNCiAgIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsDQogICAgICAgICAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgIGFscGhhPS41LA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgdGhlbWVfZ3JhZnMoKSsNCiAgICB0aGVtZSgNCiAgICAgICAgYXhpcy50ZXh0LnkgPSBlbGVtZW50X3RleHQoDQogICAgICAgICAgYW5nbGUgPSA5MCwgDQogICAgICAgICAgIyBzaXplPTE1LA0KICAgICAgICAgICMgZmFjZT0yDQogICAgICAgICksDQogICAgICAgIHBsb3QudGl0bGUgPSANCiAgICAgICAgICBlbGVtZW50X21hcmtkb3duKA0KICAgICAgICAgICAgaGp1c3QgPSAwLjUsDQogICAgICAgICAgICBjb2xvciA9ICJibGFjayIsDQogICAgICAgICAgICBzaXplID0gMTkpDQogICAgKQ0KKQ0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIEVjb2xpIHBlcmlvZG8xLCB3YXJuaW5nID0gRkFMU0UsIG1lc3NhZ2UgPSBGQUxTRX0NCihlY29saV9wMSA8LSBnZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEE+IjE5OTAiICYNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDAwIiksDQogICAgICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICAgICBFX2NvbGkpKSsNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MzIwMCwNCiAgICAgICAgICAgICB5bWF4PUluZiwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiNhYzUwNzkiKSsgIz5waW9yIGNsYXNzZQ0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj04MDAsDQogICAgICAgICAgICAgeW1heD0zMjAwLA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iI2ZjZjdhYiIpKyAjY2xhc3NlIDMNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MTYwLA0KICAgICAgICAgICAgIHltYXg9ODAwLA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iIzcwYzE4YyIpKyAjY2xhc3NlIDINCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49MCwNCiAgICAgICAgICAgICB5bWF4PTE2MCwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICAgc3RhdF9ib3hwbG90KGdlb20gPSAnZXJyb3JiYXInLA0KICAgICAgICAgICAgICAgICB3aWR0aD0wLjMsDQogICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSkrDQogICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgICBjb2xvcj0iYmxhY2siLA0KICAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICAgd2lkdGg9IDAuNykrDQogICAgbGFicyh0aXRsZSA9ICJFc2NoZXJpY2hpYSBjb2xpIG5vIHBlcsOtb2RvIDE5OTAtMjAwMCIsDQogICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICAgeT0iTk1QLzEwMG1MIikrDQogICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAuMDEsIDAuMDEpKSwNCiAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDksDQogICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYyhtaW4ocGxhbl93aWRlXzE5OTAyMDIwJEVfY29saSwgbmEucm0gPSBUUlVFKSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG1heChwbGFuX3dpZGVfMTk5MDIwMjAkRV9jb2xpLCBuYS5ybSA9IFRSVUUpKSwNCiAgICAgICAgICAgICAgICAgICAgICB0cmFucyA9ICJsb2cxMCIsDQogICAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gc2NhbGVzOjpudW1iZXJfZm9ybWF0KGFjY3VyYWN5ID0gMSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGVjaW1hbC5tYXJrID0gIiwiLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBiaWcubWFyayA9ICIgIikpKw0KICAgIGdnYmVlc3dhcm06Omdlb21fcXVhc2lyYW5kb20oDQogICAgICAgc2l6ZSA9IDEuMiwNCiAgICAgICBhbHBoYSA9IC4yNSwNCiAgICAgICB3aWR0aCA9IC4wNywNCiAgICApKw0KICAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTgwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA1NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IGMoIlBNMSIsICJQTTIiLCAiUE0zIiwgIlBNNCIsICJQTTUiLCAiUE02IiwgIlBNNyIpDQogICAgKSsNCiAgICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBFY29saSBwZXJpb2RvMiwgd2FybmluZyA9IEZBTFNFLCBtZXNzYWdlID0gRkFMU0V9DQooZWNvbGlfcDIgPC0gZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUgDQogICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihBTk9fQ09MRVRBPiIyMDAwIiAmDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBBTk9fQ09MRVRBPD0iMjAxMCIpLA0KICAgICAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICAgICAgRV9jb2xpKSkrDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTMyMDAsDQogICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49ODAwLA0KICAgICAgICAgICAgIHltYXg9MzIwMCwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiNmY2Y3YWIiKSsgI2NsYXNzZSAzDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTE2MCwNCiAgICAgICAgICAgICB5bWF4PTgwMCwNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiM3MGMxOGMiKSsgI2NsYXNzZSAyDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTAsDQogICAgICAgICAgICAgeW1heD0xNjAsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcpKw0KICAgIGxhYnModGl0bGUgPSAiRXNjaGVyaWNoaWEgY29saSBubyBwZXLDrW9kbyAyMDAwLTIwMTAiLA0KICAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgIHk9Ik5NUC8xMDBtTCIpKw0KICAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMC4wMSwgMC4wMSkpLA0KICAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDksDQogICAgICAgICAgICAgICAgICAgICAgIGxpbWl0cyA9IGMobWluKHBsYW5fd2lkZV8xOTkwMjAyMCRFX2NvbGksIG5hLnJtID0gVFJVRSksDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbWF4KHBsYW5fd2lkZV8xOTkwMjAyMCRFX2NvbGksIG5hLnJtID0gVFJVRSkpLA0KICAgICAgICAgICAgICAgICAgICAgICB0cmFucyA9ICJsb2cxMCIsDQogICAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IHNjYWxlczo6bnVtYmVyX2Zvcm1hdChhY2N1cmFjeSA9IDEsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZWNpbWFsLm1hcmsgPSAiLCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBiaWcubWFyayA9ICIgIikpKw0KICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgc2l6ZSA9IDEuMiwNCiAgICAgYWxwaGEgPSAuMjUsDQogICAgIHdpZHRoID0gLjA3LA0KICAgKSsNCiAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5ODAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDU1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gYygiUE0xIiwgIlBNMiIsICJQTTMiLCAiUE00IiwgIlBNNSIsICJQTTYiLCAiUE03IikNCiAgICkrDQogICAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwNCiAgICAgICAgICAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICAgICAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgICAgICAgICAgYWxwaGE9LjUsDQogICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgICAgICAgICAgIHNpemUgPSAxKSsNCiAgICB0aGVtZV9ncmFmcygpDQopDQpgYGANCg0KYGBge3IgR3LDoWZpY28gRWNvbGkgcGVyaW9kbzMsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKGVjb2xpX3AzIDwtIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAgJT4lIA0KICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMjAxMCIgJg0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMjAiKSwNCiAgICAgICAgICAgICAgICAgICAgYWVzKENPRElHTywNCiAgICAgICAgICAgICAgICAgICAgICAgIEVfY29saSkpKw0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj0zMjAwLA0KICAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iI2FjNTA3OSIpKyAjPnBpb3IgY2xhc3NlDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTgwMCwNCiAgICAgICAgICAgICB5bWF4PTMyMDAsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjZmNmN2FiIikrICNjbGFzc2UgMw0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj0xNjAsDQogICAgICAgICAgICAgeW1heD04MDAsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjNzBjMThjIikrICNjbGFzc2UgMg0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICAgeW1pbj0wLA0KICAgICAgICAgICAgIHltYXg9MTYwLA0KICAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICAgZmlsbD0iIzhkY2RlYiIpKyAjY2xhc3NlIDENCiAgICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgIHdpZHRoPTAuMywNCiAgICAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuNjUpKSsNCiAgICBnZW9tX2JveHBsb3QoZmlsbD0nI0Y4RjhGRicsDQogICAgICAgICAgICAgICAgIGNvbG9yPSJibGFjayIsDQogICAgICAgICAgICAgICAgIG91dGxpZXIuc2hhcGUgPSBOQSwgI3NlIGRlaXhhciBOQSBmaWNhIHPDsyBvIGppdHRlciwgc2UgbsOjbywgZGVpeGEgMQ0KICAgICAgICAgICAgICAgICB3aWR0aD0gMC43KSsNCiAgICBsYWJzKHRpdGxlID0gIkVzY2hlcmljaGlhIGNvbGkgbm8gcGVyw61vZG8gMjAxMC0yMDIwIiwNCiAgICAgICAgIHg9IkVzdGHDp8OjbyIsDQogICAgICAgICB5PSJOTVAvMTAwbUwiKSsNCiAgICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAuMDEsIDAuMDEpKSwNCiAgICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSA5LA0KICAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKG1pbihwbGFuX3dpZGVfMTk5MDIwMjAkRV9jb2xpLCBuYS5ybSA9IFRSVUUpLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG1heChwbGFuX3dpZGVfMTk5MDIwMjAkRV9jb2xpLCBuYS5ybSA9IFRSVUUpKSwNCiAgICAgICAgICAgICAgICAgICAgICAgdHJhbnMgPSAibG9nMTAiLA0KICAgICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBzY2FsZXM6Om51bWJlcl9mb3JtYXQoYWNjdXJhY3kgPSAxLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGVjaW1hbC5tYXJrID0gIiwiLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgYmlnLm1hcmsgPSAiICIpKSsNCiAgICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICBzaXplID0gMS4yLA0KICAgICBhbHBoYSA9IC4yNSwNCiAgICAgd2lkdGggPSAuMDcsDQogICApKw0KICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgKSsNCiAgICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBlY29saSAzIHBlcmlvZG9zIGp1bnRvcywgd2FybmluZz1GQUxTRSwgbWVzc2FnZT1GQUxTRX0NCmdyaWQuYXJyYW5nZShlY29saV9wMSwgZWNvbGlfcDIsIGVjb2xpX3AzLCBuY29sID0gMykNCmBgYA0KDQpgYGB7ciBTdW3DoXJpbyBFY29saSwgd2FybmluZz1GQUxTRSwgbWVzc2FnZSA9IEZBTFNFLH0NCihzdW1fZWNvbGlfcDEgPC0gcGxhbl93aWRlXzE5OTAyMDIwICU+JQ0KICAgIHNlbGVjdChDT0RJR08sIEVfY29saSwgQU5PX0NPTEVUQSkgJT4lIA0KICAgIGZpbHRlcihBTk9fQ09MRVRBPiIxOTkwIiAmDQogICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDAwIikgJT4lIA0KICAgZ3JvdXBfYnkoQ09ESUdPKSAlPiUgDQogICBzdW1tYXJpemUoDQogICAgIG1pbiA9IA0KICAgICAgIG1pbihFX2NvbGksIA0KICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICBxMSA9IA0KICAgICAgIHF1YW50aWxlKEVfY29saSwgMC4yNSwgDQogICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgbWVkaWFuID0gDQogICAgICAgbWVkaWFuKEVfY29saSwgDQogICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIG1lYW4gPSANCiAgICAgICBtZWFuKEVfY29saSwgDQogICAgICAgICAgICBuYS5ybT0gVFJVRSksDQogICAgIHEzID0gDQogICAgICAgcXVhbnRpbGUoRV9jb2xpLCAwLjc1LCANCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICBtYXggPSANCiAgICAgICBtYXgoRV9jb2xpLCANCiAgICAgICAgICAgbmEucm0gPSBUUlVFKSkNCikNCg0KKHN1bV9lY29saV9wMiA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgc2VsZWN0KENPRElHTywgRV9jb2xpLCBBTk9fQ09MRVRBKSAlPiUgDQogICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMDAiICYNCiAgICAgICAgICAgICBBTk9fQ09MRVRBPD0iMjAxMCIpICU+JSANCiAgICBncm91cF9ieShDT0RJR08pICU+JSANCiAgICBzdW1tYXJpemUoDQogICAgICBtaW4gPSANCiAgICAgICAgbWluKEVfY29saSwgDQogICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgcTEgPSANCiAgICAgICAgcXVhbnRpbGUoRV9jb2xpLCAwLjI1LCANCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lZGlhbiA9IA0KICAgICAgICBtZWRpYW4oRV9jb2xpLCANCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBtZWFuID0gDQogICAgICAgIG1lYW4oRV9jb2xpLCANCiAgICAgICAgICAgICBuYS5ybT0gVFJVRSksDQogICAgICBxMyA9IA0KICAgICAgICBxdWFudGlsZShFX2NvbGksIDAuNzUsIA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWF4ID0gDQogICAgICAgIG1heChFX2NvbGksIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSkNCikNCg0KKHN1bV9lY29saV9wMyA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgc2VsZWN0KENPRElHTywgRV9jb2xpLCBBTk9fQ09MRVRBKSAlPiUgDQogICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMTAiICYNCiAgICAgICAgICAgICBBTk9fQ09MRVRBPD0iMjAyMCIpICU+JSANCiAgICBncm91cF9ieShDT0RJR08pICU+JSANCiAgICBzdW1tYXJpemUoDQogICAgICBtaW4gPSANCiAgICAgICAgbWluKEVfY29saSwgDQogICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgcTEgPSANCiAgICAgICAgcXVhbnRpbGUoRV9jb2xpLCAwLjI1LCANCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lZGlhbiA9IA0KICAgICAgICBtZWRpYW4oRV9jb2xpLCANCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBtZWFuID0gDQogICAgICAgIG1lYW4oRV9jb2xpLCANCiAgICAgICAgICAgICBuYS5ybT0gVFJVRSksDQogICAgICBxMyA9IA0KICAgICAgICBxdWFudGlsZShFX2NvbGksIDAuNzUsIA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWF4ID0gDQogICAgICAgIG1heChFX2NvbGksIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSkNCikNCmBgYA0KDQpgYGB7ciBTYWx2YW5kbyBlY29saSwgd2FybmluZz1GQUxTRSwgbWVzc2FnZSA9IEZBTFNFLH0NCmdnc2F2ZSgiZWNvbGkucG5nIiwNCiAgICAgICBwbG90ID0gZWNvbGksDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgiZWNvbGlfcDEucG5nIiwNCiAgICAgICBwbG90ID0gZWNvbGlfcDEsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgiZWNvbGlfcDIucG5nIiwNCiAgICAgICBwbG90ID0gZWNvbGlfcDIsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgiZWNvbGlfcDMucG5nIiwNCiAgICAgICBwbG90ID0gZWNvbGlfcDMsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgiZWNvbGlfM3BlcmlvZG9zLnBuZyIsDQogICAgICAgdW5pdHMgPSBjKCJweCIpLA0KICAgICAgIHdpZHRoID0gNDUwMCwNCiAgICAgICBoZWlnaHQgPSAyOTkzLA0KICAgICAgIHBsb3QgPSBncmlkLmFycmFuZ2UoZWNvbGlfcDEsIGVjb2xpX3AyLCBlY29saV9wMywgbmNvbCA9IDMpLA0KICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogICAgICAgZHBpID0gMzAwLA0KICAgICAgIHR5cGUgPSAiY2Fpcm8iKQ0KYGBgDQoNCiMjIyBOaXRyb2fDqm5pbyBhbW9uaWFjYWwNCg0KYGBge3IgR3LDoWZpY28gTml0cm9nw6puaW8gdG90YWwgZmFjZXR0ZWQsIGZpZy5jYXA9Im5pdHJvZ2VuaW8tZ3JhdmF0YcOtIG5vIHBlcsOtb2RvIDE5OTAtMjAyMCIsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKG5hbW9uIDwtIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAsDQogICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICBuaXRyb19hbW9uKSkrDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49MTMuMywNCiAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNhYzUwNzkiKSsgIz5waW9yIGNsYXNzZQ0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTMuNywNCiAgICAgICAgICAgIHltYXg9MTMuMywNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjZmNmN2FiIikrICNjbGFzc2UgMw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTAsDQogICAgICAgICAgICB5bWF4PTMuNywNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgc3RhdF9ib3hwbG90KGdlb20gPSAnZXJyb3JiYXInLA0KICAgICAgICAgICAgICAgIHdpZHRoPTAuMywNCiAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgIGNvbG9yPSJibGFjayIsDQogICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgd2lkdGg9IDAuNykrDQogICBmYWNldF93cmFwKH5wZXJpb2RvKSsNCiAgIGxhYnModGl0bGUgPSAiTml0cm9nw6puaW8gYW1vbmlhY2FsIG5vIHBlcsOtb2RvIDE5OTAtMjAyMCIsDQogICAgICAgIHg9IkVzdGHDp8OjbyIsDQogICAgICAgIHk9Im1nL0wiKSsNCiAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMC4wMSwgMC4wNSkpLA0KICAgICAgICAgICAgICAgICAgICAgIG4uYnJlYWtzID0gOSwNCiAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKG1pbihwbGFuX3dpZGVfMTk5MDIwMjAkbml0cm9fdG90YWwsIG5hLnJtID0gVFJVRSksDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBtYXgocGxhbl93aWRlXzE5OTAyMDIwJG5pdHJvX3RvdGFsLCBuYS5ybSA9IFRSVUUpKSwNCiAgICAgICAgICAgICAgICAgICAgICB0cmFucyA9ICJsb2cxMCIsDQogICAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gc2NhbGVzOjpudW1iZXJfZm9ybWF0KGFjY3VyYWN5ID0gLjAwMSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGVjaW1hbC5tYXJrID0gIiwiLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBiaWcubWFyayA9ICIgIikpKw0KICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgc2l6ZSA9IDEuMiwNCiAgICAgYWxwaGEgPSAuMjUsDQogICAgIHdpZHRoID0gLjA3LA0KICAgKSsNCiAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5ODAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDU1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gYygiUE0xIiwgIlBNMiIsICJQTTMiLCAiUE00IiwgIlBNNSIsICJQTTYiLCAiUE03IikNCiAgICkrDQogICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgICAgICAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSwNCiAgICAgICAgICAgICAgIHNpemUgPSAxKSsNCiAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBOaXRyb2fDqm5pbyBsaW5lLCB3YXJuaW5nID0gRkFMU0UsIG1lc3NhZ2UgPSBGQUxTRX0NCnBlcmlvZG9faW5pY2lhbCA8LSBhcy5EYXRlKCIxOTkwLTAxLTAxIiwgIiVZLSVtLSVkIikNCnBlcmlvZG9fZmluYWwgPC0gYXMuRGF0ZSgiMjAyMS0wMS0wMSIsICAiJVktJW0tJWQiKQ0KDQoobml0cm9fbGluZSA8LSANCiAgICBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgZmlsdGVyKEFOT19DT0xFVEEgPiAiMTk5MCIgJg0KICAgICAgICAgICAgIEFOT19DT0xFVEEgPD0gIjIwMjAiKSAlPiUNCiAgICBkcGx5cjo6c2VsZWN0KENPRElHTywgbml0cm9fYW1vbiwgREFUQV9DT0xFVEEsIHBlcmlvZG8pICU+JQ0KICAgIGdyb3VwX2J5KENPRElHTykgJT4lDQogICAgIyBwaXZvdF93aWRlcigNCiAgICAjICAgbmFtZXNfZnJvbSA9IENPRElHTywNCiAgICAjICAgdmFsdWVzX2Zyb20gPSBuaXRyb19hbW9uLA0KICAgICMgICBpZF9jb2xzID0gREFUQV9DT0xFVEENCiAgICAjICkgJT4lIA0KICAgIGdncGxvdCgNCiAgICAgIGFlcyh4ID0gREFUQV9DT0xFVEEsDQogICAgICAgICAgeSA9IG5pdHJvX2Ftb24sDQogICAgICAgICAgIyBjb2xvciA9IENPRElHTw0KICAgICAgKSkrDQogICAgIyBnZW9tX3JlY3QoDQogICAgIyAgIGFlcyh4bWluID0gcGVyaW9kb19pbmljaWFsLCANCiAgICAjICAgICAgIHhtYXggPSBwZXJpb2RvX2ZpbmFsLA0KICAgICMgICAgICAgeW1pbiA9IDEzLjMsIA0KICAgICMgICAgICAgeW1heCA9IEluZiwNCiAgICAjICAgICAgIGFscGhhPSAwLjAwNSwNCiAgICAjICAgICAgIGZpbGw9ICIjYWM1MDc5IiksDQogICAgIyBzaG93LmxlZ2VuZCA9IEZBTFNFKSsgIz5waW9yIGNsYXNzZQ0KICAgICMgZ2VvbV9yZWN0KA0KICAgICMgICBhZXMoeG1pbiA9IHBlcmlvZG9faW5pY2lhbCwgDQogICAgIyAgICAgICB4bWF4ID0gcGVyaW9kb19maW5hbCwNCiAgIyAgICAgICB5bWluPSAzLjcsDQogICMgICAgICAgeW1heD0gMTMuMywNCiAgIyAgICAgICBhbHBoYT0gMC4wMDUsDQogICMgICAgICAgZmlsbD0gIiNmY2Y3YWIiKSwNCiAgIyAgICBzaG93LmxlZ2VuZCA9IEZBTFNFKSsgI2NsYXNzZSAzDQogICMgZ2VvbV9yZWN0KA0KICAjICAgYWVzKHhtaW4gPSBwZXJpb2RvX2luaWNpYWwsIA0KICAjICAgICAgIHhtYXggPSBwZXJpb2RvX2ZpbmFsLA0KICAjICAgICAgIHltaW49IDAsDQogICMgICAgICAgeW1heD0gMy43LA0KICAjICAgICAgIGFscGhhPSAwLjAwNSwNCiAgIyAgICAgICBmaWxsPSAiYmx1ZSINCiAgIyAgICAgICAgICMgIiM4ZGNkZWIiDQogICMgICAgICAgICApLA0KICAjICAgIHNob3cubGVnZW5kID0gRkFMU0UpKyAjY2xhc3NlIDENCiAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICB4bWluPSBwZXJpb2RvX2luaWNpYWwsDQogICAgICAgICAgIHhtYXg9IHBlcmlvZG9fZmluYWwsDQogICAgICAgICAgIHltaW49MTMuMywNCiAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgIGFscGhhPSAwLjcsDQogICAgICAgICAgIGZpbGw9IiNhYzUwNzkiKSsgIz5waW9yIGNsYXNzZQ0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPSBwZXJpb2RvX2luaWNpYWwsDQogICAgICAgICAgICAgeG1heD0gcGVyaW9kb19maW5hbCwNCiAgICAgICAgICAgICB5bWluPTMuNywNCiAgICAgICAgICAgICB5bWF4PTEzLjMsDQogICAgICAgICAgICAgYWxwaGE9IDAuNywNCiAgICAgICAgICAgICBmaWxsPSIjZmNmN2FiIikrICNjbGFzc2UgMw0KICAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgICB4bWluPSBwZXJpb2RvX2luaWNpYWwsDQogICAgICAgICAgICAgeG1heD0gcGVyaW9kb19maW5hbCwNCiAgICAgICAgICAgICB5bWluPSAtSW5mLA0KICAgICAgICAgICAgIHltYXg9My43LA0KICAgICAgICAgICAgIGFscGhhPSAwLjcsDQogICAgICAgICAgICAgZmlsbD0iIzhkY2RlYiIpKyAjY2xhc3NlIDENCiAgICBnZW9tX2xpbmUoDQogICAgICAjIGFlcyhjb2xvciA9IENPRElHTyksDQogICAgICBuYS5ybSA9IFRSVUUpKw0KICAgIGdlb21fcG9pbnQoDQogICAgICAjIGFlcyhjb2xvciA9IENPRElHTyksDQogICAgICBuYS5ybSA9IFRSVUUpKw0KICAgIHNjYWxlX3hfZGF0ZSgNCiAgICAgIGxpbWl0cyA9IGFzLkRhdGUoYygNCiAgICAgICAgIjE5OTAtMDEtMDEiLCANCiAgICAgICAgIjIwMjEtMDEtMDEiDQogICAgICAgICMgTkEgI3BvZGUgdXNhciBOQSB0YW1iw6ltDQogICAgICApKSwNCiAgICAgIGV4cGFuZCA9IGMoMC4wLCAwLjApLA0KICAgICAgZGF0ZV9icmVha3MgPSAiMTAgeWVhcnMiLA0KICAgICAgbWlub3JfYnJlYWtzID0gIjUgeWVhcnMiLA0KICAgICAgZGF0ZV9sYWJlbHMgPSAiJVkiLA0KICAgICkrDQogICAgIyBnZW9tX3Ntb290aCgNCiAgICAjICAgIyBhZXMoY29sb3IgPSBDT0RJR08pLA0KICAgICMgICBtZXRob2QgPSAibG0iLA0KICAgICMgICAjIGZvcm11bGEgPSB5IH4gcG9seSh4LCAyKSwNCiAgICAjICAgIyBzcGFuID0gMC4yLA0KICAgICMgICBzZSA9IFRSVUUsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgIyAgIGFlcyhncm91cCA9IDEpLA0KICAgICMgICBhbHBoYSA9LjUsDQogICAgIyAgIG5hLnJtID0gVFJVRSwNCiAgICAjICAgc2l6ZSA9IDAuMywNCiAgICAjICAgIyBmdWxscmFuZ2UgPSBUUlVFLA0KICAjICAgIyBzaG93LmxlZ2VuZCA9IFRSVUUNCiAgIyApKw0KICAjIHN0YXRfc21vb3RoKA0KICAjICAgZ2VvbSA9ICJzbW9vdGgiLA0KICAjICAgIyBzcGFuID0gMC4yLA0KICAjICAgc2UgPSBGQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgIyAgICMgYWVzKGdyb3VwID0gMSksDQogICMgICAjIGFscGhhID0uNSwNCiAgIyAgIG5hLnJtID0gVFJVRSwNCiAgIyAgICMgc2l6ZSA9IDAuMywNCiAgIyAgIGZ1bGxyYW5nZSA9IFRSVUUsDQogICMgICBzaG93LmxlZ2VuZCA9IFRSVUUNCiAgIyApKw0KICBmYWNldF93cmFwKA0KICAgIH5DT0RJR08sDQogICAgbnJvdyA9IDQsDQogICkrDQogICAgdGhlbWVfYncoKQ0KKQ0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIE5pdHJvZ8OqbmlvIHRvdGFsIHBlcmlvZG8xLCB3YXJuaW5nID0gRkFMU0UsIG1lc3NhZ2UgPSBGQUxTRX0NCihuYW1vbl9wMSA8LSBnZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMTk5MCIgJg0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDAwIiksDQogICAgICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICAgICBuaXRyb190b3RhbCkpKw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTEzLjMsDQogICAgICAgICAgICB5bWF4PUluZiwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgIHltaW49My43LA0KICAgICAgICAgICAgIHltYXg9MTMuMywNCiAgICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgIGZpbGw9IiNmY2Y3YWIiKSsgI2NsYXNzZSAzDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPTAsDQogICAgICAgICAgICAgeW1heD0zLjcsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcpKw0KICAgbGFicyh0aXRsZSA9ICJOaXRyb2fDqm5pbyBhbW9uaWFjYWwgbm8gcGVyw61vZG8gMTk5MC0yMDAwIiwNCiAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgeT0ibWcvTCIpKw0KICAgc2NhbGVfeV9jb250aW51b3VzKGV4cGFuZCA9IGV4cGFuc2lvbihtdWx0ID0gYygwLjAxLCAwLjA1KSksDQogICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSA5LA0KICAgICAgICAgICAgICAgICAgICAgIGxpbWl0cyA9IGMobWluKHBsYW5fd2lkZV8xOTkwMjAyMCRuaXRyb190b3RhbCwgbmEucm0gPSBUUlVFKSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG1heChwbGFuX3dpZGVfMTk5MDIwMjAkbml0cm9fdG90YWwsIG5hLnJtID0gVFJVRSkpLA0KICAgICAgICAgICAgICAgICAgICAgIHRyYW5zID0gImxvZzEwIiwNCiAgICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBzY2FsZXM6Om51bWJlcl9mb3JtYXQoYWNjdXJhY3kgPSAuMDAxLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZWNpbWFsLm1hcmsgPSAiLCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGJpZy5tYXJrID0gIiAiKSkrDQogICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgc2l6ZSA9IDEuMiwNCiAgICAgYWxwaGEgPSAuMjUsDQogICAgIHdpZHRoID0gLjA3LA0KICAgKSsNCiAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5ODAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDU1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gYygiUE0xIiwgIlBNMiIsICJQTTMiLCAiUE00IiwgIlBNNSIsICJQTTYiLCAiUE03IikNCiAgICkrDQogICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgICAgICAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSwNCiAgICAgICAgICAgICAgIHNpemUgPSAxKSsNCiAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBOaXRyb2fDqm5pbyB0b3RhbCBwZXJpb2RvMiwgd2FybmluZyA9IEZBTFNFLCBtZXNzYWdlID0gRkFMU0V9DQoobmFtb25fcDIgPC0gZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUgDQogICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMDAiICYNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBBTk9fQ09MRVRBPD0iMjAxMCIpLA0KICAgICAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICAgICAgbml0cm9fdG90YWwpKSsNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0xMy4zLA0KICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2FjNTA3OSIpKyAjPnBpb3IgY2xhc3NlDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49My43LA0KICAgICAgICAgICAgeW1heD0xMy4zLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNmY2Y3YWIiKSsgI2NsYXNzZSAzDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49MCwNCiAgICAgICAgICAgIHltYXg9My43LA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSkrDQogICBnZW9tX2JveHBsb3QoZmlsbD0nI0Y4RjhGRicsDQogICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICB3aWR0aD0gMC43KSsNCiAgIGxhYnModGl0bGUgPSAiTml0cm9nw6puaW8gYW1vbmlhY2FsIG5vIHBlcsOtb2RvIDIwMDAtMjAxMCIsDQogICAgICAgIHg9IkVzdGHDp8OjbyIsDQogICAgICAgIHk9Im1nL0wiKSsNCiAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMC4wMSwgMC4wNSkpLA0KICAgICAgICAgICAgICAgICAgICAgIG4uYnJlYWtzID0gOSwNCiAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKG1pbihwbGFuX3dpZGVfMTk5MDIwMjAkbml0cm9fdG90YWwsIG5hLnJtID0gVFJVRSksDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBtYXgocGxhbl93aWRlXzE5OTAyMDIwJG5pdHJvX3RvdGFsLCBuYS5ybSA9IFRSVUUpKSwNCiAgICAgICAgICAgICAgICAgICAgICB0cmFucyA9ICJsb2cxMCIsDQogICAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gc2NhbGVzOjpudW1iZXJfZm9ybWF0KGFjY3VyYWN5ID0gLjAwMSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGVjaW1hbC5tYXJrID0gIiwiLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBiaWcubWFyayA9ICIgIikpKw0KICAgIGdnYmVlc3dhcm06Omdlb21fcXVhc2lyYW5kb20oDQogICAgIHNpemUgPSAxLjIsDQogICAgIGFscGhhID0gLjI1LA0KICAgICB3aWR0aCA9IC4wNywNCiAgICkrDQogICBzY2FsZV94X2Rpc2NyZXRlKGxpbWl0cyA9IGMoIjg3Mzk4NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTgwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTUwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA1NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA2OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA5OTAwIiksDQogICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IGMoIlBNMSIsICJQTTIiLCAiUE0zIiwgIlBNNCIsICJQTTUiLCAiUE02IiwgIlBNNyIpDQogICApKw0KICAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwNCiAgICAgICAgICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgICAgICAgICAgYWVzKGdyb3VwPTEpLA0KICAgICAgICAgICAgICAgYWxwaGE9LjUsDQogICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgICAgICAgICBzaXplID0gMSkrDQogICB0aGVtZV9ncmFmcygpDQopDQpgYGANCg0KYGBge3IgR3LDoWZpY28gTml0cm9nw6puaW8gdG90YWwgcGVyaW9kbzMsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKG5hbW9uX3AzIDwtIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAgJT4lIA0KICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMjAxMCIgJg0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMjAiKSwNCiAgICAgICAgICAgICAgICAgICAgYWVzKENPRElHTywNCiAgICAgICAgICAgICAgICAgICAgICAgIG5pdHJvX3RvdGFsKSkrDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49MTMuMywNCiAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNhYzUwNzkiKSsgIz5waW9yIGNsYXNzZQ0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTMuNywNCiAgICAgICAgICAgIHltYXg9MTMuMywNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjZmNmN2FiIikrICNjbGFzc2UgMw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTAsDQogICAgICAgICAgICB5bWF4PTMuNywNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgc3RhdF9ib3hwbG90KGdlb20gPSAnZXJyb3JiYXInLA0KICAgICAgICAgICAgICAgIHdpZHRoPTAuMywNCiAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgIGNvbG9yPSJibGFjayIsDQogICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgd2lkdGg9IDAuNykrDQogICBsYWJzKHRpdGxlID0gIk5pdHJvZ8OqbmlvIGFtb25pYWNhbCBubyBwZXLDrW9kbyAyMDEwLTIwMjAiLA0KICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICB5PSJtZy9MIikrDQogICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAuMDEsIDAuMDUpKSwNCiAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDksDQogICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYyhtaW4ocGxhbl93aWRlXzE5OTAyMDIwJG5pdHJvX3RvdGFsLCBuYS5ybSA9IFRSVUUpLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbWF4KHBsYW5fd2lkZV8xOTkwMjAyMCRuaXRyb190b3RhbCwgbmEucm0gPSBUUlVFKSksDQogICAgICAgICAgICAgICAgICAgICAgdHJhbnMgPSAibG9nMTAiLA0KICAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IHNjYWxlczo6bnVtYmVyX2Zvcm1hdChhY2N1cmFjeSA9IC4wMDEsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlY2ltYWwubWFyayA9ICIsIiwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgYmlnLm1hcmsgPSAiICIpKSsNCiAgICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICBzaXplID0gMS4yLA0KICAgICBhbHBoYSA9IC4yNSwNCiAgICAgd2lkdGggPSAuMDcsDQogICApKw0KICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgKSsNCiAgIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsDQogICAgICAgICAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgIGFscGhhPS41LA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgdGhlbWVfZ3JhZnMoKQ0KKQ0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIE5hbW9uIDMgcGVyaW9kb3MganVudG9zLCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlPUZBTFNFfQ0KZ3JpZC5hcnJhbmdlKG5hbW9uX3AxLCBuYW1vbl9wMiwgbmFtb25fcDMsIG5jb2wgPSAzKQ0KYGBgDQoNCmBgYHtyIFN1bcOhcmlvIE5pdHJvZ8OqbmlvIHRvdGFsLCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlID0gRkFMU0UsfQ0KKHN1bV9uYW1vbl9wMSA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICBzZWxlY3QoQ09ESUdPLCBuaXRyb190b3RhbCwgQU5PX0NPTEVUQSkgJT4lIA0KICAgZmlsdGVyKEFOT19DT0xFVEE+IjE5OTAiICYNCiAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDAwIikgJT4lIA0KICAgZ3JvdXBfYnkoQ09ESUdPKSAlPiUgDQogICBzdW1tYXJpemUoDQogICAgIG1pbiA9IA0KICAgICAgIG1pbihuaXRyb190b3RhbCwgDQogICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIHExID0gDQogICAgICAgcXVhbnRpbGUobml0cm9fdG90YWwsIDAuMjUsIA0KICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIG1lZGlhbiA9IA0KICAgICAgIG1lZGlhbihuaXRyb190b3RhbCwgDQogICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIG1lYW4gPSANCiAgICAgICBtZWFuKG5pdHJvX3RvdGFsLCANCiAgICAgICAgICAgIG5hLnJtPSBUUlVFKSwNCiAgICAgcTMgPSANCiAgICAgICBxdWFudGlsZShuaXRyb190b3RhbCwgMC43NSwgDQogICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgbWF4ID0gDQogICAgICAgbWF4KG5pdHJvX3RvdGFsLCANCiAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG4gPSANCiAgICAgICBsZW5ndGgobml0cm9fdG90YWwpDQogICApDQopDQoNCihzdW1fbmFtb25fcDIgPC0gcGxhbl93aWRlXzE5OTAyMDIwICU+JQ0KICAgIHNlbGVjdChDT0RJR08sIG5pdHJvX3RvdGFsLCBBTk9fQ09MRVRBKSAlPiUgDQogICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMDAiICYNCiAgICAgICAgICAgICBBTk9fQ09MRVRBPD0iMjAxMCIpICU+JSANCiAgICBncm91cF9ieShDT0RJR08pICU+JSANCiAgICBzdW1tYXJpemUoDQogICAgICBtaW4gPSANCiAgICAgICAgbWluKG5pdHJvX3RvdGFsLCANCiAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBxMSA9IA0KICAgICAgICBxdWFudGlsZShuaXRyb190b3RhbCwgMC4yNSwgDQogICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBtZWRpYW4gPSANCiAgICAgICAgbWVkaWFuKG5pdHJvX3RvdGFsLCANCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBtZWFuID0gDQogICAgICAgIG1lYW4obml0cm9fdG90YWwsIA0KICAgICAgICAgICAgIG5hLnJtPSBUUlVFKSwNCiAgICAgIHEzID0gDQogICAgICAgIHF1YW50aWxlKG5pdHJvX3RvdGFsLCAwLjc1LCANCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1heCA9IA0KICAgICAgICBtYXgobml0cm9fdG90YWwsIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSkNCikNCg0KKHN1bV9uYW1vbl9wMyA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgc2VsZWN0KENPRElHTywgbml0cm9fdG90YWwsIEFOT19DT0xFVEEpICU+JSANCiAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMjAxMCIgJg0KICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDIwIikgJT4lIA0KICAgIGdyb3VwX2J5KENPRElHTykgJT4lIA0KICAgIHN1bW1hcml6ZSgNCiAgICAgIG1pbiA9IA0KICAgICAgICBtaW4obml0cm9fdG90YWwsIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIHExID0gDQogICAgICAgIHF1YW50aWxlKG5pdHJvX3RvdGFsLCAwLjI1LCANCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lZGlhbiA9IA0KICAgICAgICBtZWRpYW4obml0cm9fdG90YWwsIA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lYW4gPSANCiAgICAgICAgbWVhbihuaXRyb190b3RhbCwgDQogICAgICAgICAgICAgbmEucm09IFRSVUUpLA0KICAgICAgcTMgPSANCiAgICAgICAgcXVhbnRpbGUobml0cm9fdG90YWwsIDAuNzUsIA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWF4ID0gDQogICAgICAgIG1heChuaXRyb190b3RhbCwgDQogICAgICAgICAgICBuYS5ybSA9IFRSVUUpKQ0KKQ0KYGBgDQoNCmBgYHtyIFNhbHZhbmRvIG5hbW9uLCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlID0gRkFMU0UsfQ0KZ2dzYXZlKCJuYW1vbi5wbmciLA0KICAgICAgIHVuaXRzID0gYygicHgiKSwNCiAgICAgICB3aWR0aCA9IDQ1MDAsDQogICAgICAgaGVpZ2h0ID0gMjk5MywNCiAgICAgICBwbG90ID0gbmFtb24sDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgibmFtb25fcDEucG5nIiwNCiAgICAgICBwbG90ID0gbmFtb25fcDEsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgibmFtb25fcDIucG5nIiwNCiAgICAgICBwbG90ID0gbmFtb25fcDIsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgibmFtb25fcDMucG5nIiwNCiAgICAgICBwbG90ID0gbmFtb25fcDMsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgibmFtb25fM3BlcmlvZG9zLnBuZyIsDQogICAgICAgdW5pdHMgPSBjKCJweCIpLA0KICAgICAgIHdpZHRoID0gNDUwMCwNCiAgICAgICBoZWlnaHQgPSAyOTkzLA0KICAgICAgIHBsb3QgPSBncmlkLmFycmFuZ2UobmFtb25fcDEsIG5hbW9uX3AyLCBuYW1vbl9wMywgbmNvbCA9IDMpLA0KICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogICAgICAgZHBpID0gMzAwLA0KICAgICAgIHR5cGUgPSAiY2Fpcm8iKQ0KYGBgDQoNCiMjIyBUdXJiaWRleg0KDQpgYGB7ciBHcsOhZmljbyBUdXJiaWRleiBmYWNldHRlZCwgZmlnLmNhcD0idHVyYmlkZXotZ3JhdmF0YcOtIG5vIHBlcsOtb2RvIDE5OTAtMjAyMCIsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKHR1cmIgPC0gZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCwNCiAgICAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICAgICB0dXJiaWRleikpKw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTEwMCwNCiAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNhYzUwNzkiKSsgIz5waW9yIGNsYXNzZQ0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTQwLA0KICAgICAgICAgICAgeW1heD0xMDAsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2ZjZjdhYiIpKyAjY2xhc3NlIDMNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0wLA0KICAgICAgICAgICAgeW1heD00MCwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgc3RhdF9ib3hwbG90KGdlb20gPSAnZXJyb3JiYXInLA0KICAgICAgICAgICAgICAgIHdpZHRoPTAuMywNCiAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgIGNvbG9yPSJibGFjayIsDQogICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgd2lkdGg9IDAuNykrDQogICBmYWNldF93cmFwKH5wZXJpb2RvKSsNCiAgIGxhYnModGl0bGUgPSAiVHVyYmlkZXogbm8gcGVyw61vZG8gMTk5MC0yMDIwIiwNCiAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgeT0iVU5UIikrDQogICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAuMDUsIDAuMDUpKSwNCiAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDgsDQogICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYygNCiAgICAgICAgICAgICAgICAgICAgICAgICMgMSwNCiAgICAgICAgICAgICAgICAgICAgICAgIG1pbihwbGFuX3dpZGVfMTk5MDIwMjAkdHVyYmlkZXosIG5hLnJtID0gVFJVRSksDQogICAgICAgICAgICAgICAgICAgICAgICAjIDUwMA0KICAgICAgICAgICAgICAgICAgICAgICAgbWF4KHBsYW5fd2lkZV8xOTkwMjAyMCR0dXJiaWRleiwgbmEucm0gPSBUUlVFKQ0KICAgICAgICAgICAgICAgICAgICAgICksDQogICAgICAgICAgICAgICAgICAgICAgdHJhbnMgPSAibG9nMTAiLA0KICAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IHNjYWxlczo6bnVtYmVyX2Zvcm1hdChhY2N1cmFjeSA9IDEsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlY2ltYWwubWFyayA9ICIsIiwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgYmlnLm1hcmsgPSAiICIpKSsNCiAgICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICBzaXplID0gMS4yLA0KICAgICBhbHBoYSA9IC4yNSwNCiAgICAgd2lkdGggPSAuMDcsDQogICApKw0KICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgKSsNCiAgIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsDQogICAgICAgICAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgIGFscGhhPS41LA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgdGhlbWVfZ3JhZnMoKQ0KKQ0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIFR1cmJpZGV6IGxpbmUsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKHR1cmJfbGluZSA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogIGZpbHRlcihBTk9fQ09MRVRBID4gIjE5OTAiICYNCiAgICAgICAgICAgQU5PX0NPTEVUQSA8PSAiMjAyMCIpICU+JQ0KICBzZWxlY3QoQ09ESUdPLCB0dXJiaWRleiwgREFUQV9DT0xFVEEsIHBlcmlvZG8pICU+JQ0KICBncm91cF9ieShDT0RJR08pICU+JQ0KICBnZ3Bsb3QoDQogICAgYWVzKHggPSBEQVRBX0NPTEVUQSwNCiAgICAgICAgeSA9IHR1cmJpZGV6LA0KICAgICAgICBjb2xvciA9IENPRElHTw0KICAgICkpKw0KICAgIGdlb21fbGluZSgNCiAgICAgICMgYWVzKGNvbG9yID0gQ09ESUdPKSwNCiAgICAgIG5hLnJtID0gVFJVRSkrDQogICAgZ2VvbV9wb2ludCgNCiAgICAgICMgYWVzKGNvbG9yID0gQ09ESUdPKSwNCiAgICAgIG5hLnJtID0gVFJVRSkrDQogICAgc2NhbGVfeF9kYXRlKA0KICAgICAgbGltaXRzID0gYXMuRGF0ZShjKA0KICAgICAgICAiMTk5MC0wMS0wMSIsIA0KICAgICAgICAiMjAyMS0wMS0wMSINCiAgICAgICAgIyBOQSAjcG9kZSB1c2FyIE5BIHRhbWLDqW0NCiAgICAgICkpLA0KICAgICAgZXhwYW5kID0gYygwLjAsIDAuMCksDQogICAgICBkYXRlX2JyZWFrcyA9ICIxMCB5ZWFycyIsDQogICAgICBtaW5vcl9icmVha3MgPSAiNSB5ZWFycyIsDQogICAgICBkYXRlX2xhYmVscyA9ICIlWSIsDQogICAgKSsNCiAgIyBnZW9tX3Ntb290aCgNCiAgIyAgICMgYWVzKGNvbG9yID0gQ09ESUdPKSwNCiAgIyAgIG1ldGhvZCA9ICJsbSIsDQogICMgICAjIGZvcm11bGEgPSB5IH4gcG9seSh4LCAyKSwNCiAgIyAgICMgc3BhbiA9IDAuMiwNCiAgIyAgIHNlID0gVFJVRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgIyAgIGFlcyhncm91cCA9IDEpLA0KICAjICAgYWxwaGEgPS41LA0KICAjICAgbmEucm0gPSBUUlVFLA0KICAjICAgc2l6ZSA9IDAuMywNCiAgIyAgICMgZnVsbHJhbmdlID0gVFJVRSwNCiAgIyAgICMgc2hvdy5sZWdlbmQgPSBUUlVFDQogICMgKSsNCiAgIyBzdGF0X3Ntb290aCgNCiAgIyAgIGdlb20gPSAic21vb3RoIiwNCiAgIyAgICMgc3BhbiA9IDAuMiwNCiAgIyAgIHNlID0gRkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICMgICAjIGFlcyhncm91cCA9IDEpLA0KICAjICAgIyBhbHBoYSA9LjUsDQogICMgICBuYS5ybSA9IFRSVUUsDQogICMgICAjIHNpemUgPSAwLjMsDQogICMgICBmdWxscmFuZ2UgPSBUUlVFLA0KICAjICAgc2hvdy5sZWdlbmQgPSBUUlVFDQogICMgKSsNCiAgZmFjZXRfd3JhcCgNCiAgICB+Q09ESUdPLA0KICAgIG5yb3cgPSA0LA0KICApKw0KICB0aGVtZV9idygpDQopDQpgYGANCg0KYGBge3IgR3LDoWZpY28gVHVyYmlkZXogcGVyaW9kbzEsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKHR1cmJfcDEgPC0gZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUgDQogICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMTk5MCIgJg0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMDAiKSwNCiAgICAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICAgICB0dXJiaWRleikpKw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTEwMCwNCiAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNhYzUwNzkiKSsgIz5waW9yIGNsYXNzZQ0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTQwLA0KICAgICAgICAgICAgeW1heD0xMDAsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2ZjZjdhYiIpKyAjY2xhc3NlIDMNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0wLA0KICAgICAgICAgICAgeW1heD00MCwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgc3RhdF9ib3hwbG90KGdlb20gPSAnZXJyb3JiYXInLA0KICAgICAgICAgICAgICAgIHdpZHRoPTAuMywNCiAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgIGNvbG9yPSJibGFjayIsDQogICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgd2lkdGg9IDAuNykrDQogICBsYWJzKHRpdGxlID0gIlR1cmJpZGV6IG5vIHBlcsOtb2RvIDE5OTAtMjAwMCIsDQogICAgICAgIHg9IkVzdGHDp8OjbyIsDQogICAgICAgIHk9IlVOVCIpKw0KICAgc2NhbGVfeV9jb250aW51b3VzKGV4cGFuZCA9IGV4cGFuc2lvbihtdWx0ID0gYygwLjA1LCAwLjAzKSksDQogICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSA4LA0KICAgICAgICAgICAgICAgICAgICAgIGxpbWl0cyA9IGMobWluKHBsYW5fd2lkZV8xOTkwMjAyMCR0dXJiaWRleiwgbmEucm0gPSBUUlVFKSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIG1heChwbGFuX3dpZGVfMTk5MDIwMjAkdHVyYmlkZXosIG5hLnJtID0gVFJVRSkpLA0KICAgICAgICAgICAgICAgICAgICAgIHRyYW5zID0gImxvZzEwIiwNCiAgICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBzY2FsZXM6Om51bWJlcl9mb3JtYXQoYWNjdXJhY3kgPSAxLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZWNpbWFsLm1hcmsgPSAiLCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGJpZy5tYXJrID0gIiAiKSkrDQogICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgc2l6ZSA9IDEuMiwNCiAgICAgYWxwaGEgPSAuMjUsDQogICAgIHdpZHRoID0gLjA3LA0KICAgKSsNCiAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5ODAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDU1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gYygiUE0xIiwgIlBNMiIsICJQTTMiLCAiUE00IiwgIlBNNSIsICJQTTYiLCAiUE03IikNCiAgICkrDQogICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgICAgICAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSwNCiAgICAgICAgICAgICAgIHNpemUgPSAxKSsNCiAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBUdXJiaWRleiBwZXJpb2RvMiwgd2FybmluZyA9IEZBTFNFLCBtZXNzYWdlID0gRkFMU0V9DQoodHVyYl9wMiA8LSBnZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihBTk9fQ09MRVRBPiIyMDAwIiAmDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICBBTk9fQ09MRVRBPD0iMjAxMCIpLA0KICAgICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICAgIHR1cmJpZGV6KSkrDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49MTAwLA0KICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2FjNTA3OSIpKyAjPnBpb3IgY2xhc3NlDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49NDAsDQogICAgICAgICAgICB5bWF4PTEwMCwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjZmNmN2FiIikrICNjbGFzc2UgMw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTAsDQogICAgICAgICAgICB5bWF4PTQwLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSkrDQogICBnZW9tX2JveHBsb3QoZmlsbD0nI0Y4RjhGRicsDQogICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICB3aWR0aD0gMC43KSsNCiAgIGxhYnModGl0bGUgPSAiVHVyYmlkZXogbm8gcGVyw61vZG8gMjAwMC0yMDEwIiwNCiAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgeT0iVU5UIikrDQogICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAuMDUsIDAuMDMpKSwNCiAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDgsDQogICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYyhtaW4ocGxhbl93aWRlXzE5OTAyMDIwJHR1cmJpZGV6LCBuYS5ybSA9IFRSVUUpLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbWF4KHBsYW5fd2lkZV8xOTkwMjAyMCR0dXJiaWRleiwgbmEucm0gPSBUUlVFKSksDQogICAgICAgICAgICAgICAgICAgICAgdHJhbnMgPSAibG9nMTAiLA0KICAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IHNjYWxlczo6bnVtYmVyX2Zvcm1hdChhY2N1cmFjeSA9IDEsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlY2ltYWwubWFyayA9ICIsIiwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgYmlnLm1hcmsgPSAiICIpKSsNCiAgICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICBzaXplID0gMS4yLA0KICAgICBhbHBoYSA9IC4yNSwNCiAgICAgd2lkdGggPSAuMDcsDQogICApKw0KICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgKSsNCiAgIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsDQogICAgICAgICAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgIGFscGhhPS41LA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgdGhlbWVfZ3JhZnMoKQ0KKQ0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIFR1cmJpZGV6IHBlcmlvZG8zLCB3YXJuaW5nID0gRkFMU0UsIG1lc3NhZ2UgPSBGQUxTRX0NCih0dXJiX3AzIDwtIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAgJT4lIA0KICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMTAiICYNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDIwIiksDQogICAgICAgICAgICAgICAgICAgYWVzKENPRElHTywNCiAgICAgICAgICAgICAgICAgICAgICAgdHVyYmlkZXopKSsNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0xMDAsDQogICAgICAgICAgICB5bWF4PUluZiwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj00MCwNCiAgICAgICAgICAgIHltYXg9MTAwLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNmY2Y3YWIiKSsgI2NsYXNzZSAzDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49MCwNCiAgICAgICAgICAgIHltYXg9NDAsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iIzhkY2RlYiIpKyAjY2xhc3NlIDENCiAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICB3aWR0aD0wLjMsDQogICAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuNjUpKSsNCiAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICBjb2xvcj0iYmxhY2siLA0KICAgICAgICAgICAgICAgIG91dGxpZXIuc2hhcGUgPSBOQSwgI3NlIGRlaXhhciBOQSBmaWNhIHPDsyBvIGppdHRlciwgc2UgbsOjbywgZGVpeGEgMQ0KICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcpKw0KICAgbGFicyh0aXRsZSA9ICJUdXJiaWRleiBubyBwZXLDrW9kbyAyMDEwLTIwMjAiLA0KICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICB5PSJVTlQiKSsNCiAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMC4wNSwgMC4wMykpLA0KICAgICAgICAgICAgICAgICAgICAgIG4uYnJlYWtzID0gOCwNCiAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKG1pbihwbGFuX3dpZGVfMTk5MDIwMjAkdHVyYmlkZXosIG5hLnJtID0gVFJVRSksDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBtYXgocGxhbl93aWRlXzE5OTAyMDIwJHR1cmJpZGV6LCBuYS5ybSA9IFRSVUUpKSwNCiAgICAgICAgICAgICAgICAgICAgICB0cmFucyA9ICJsb2cxMCIsDQogICAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gc2NhbGVzOjpudW1iZXJfZm9ybWF0KGFjY3VyYWN5ID0gMSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGVjaW1hbC5tYXJrID0gIiwiLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBiaWcubWFyayA9ICIgIikpKw0KICAgIGdnYmVlc3dhcm06Omdlb21fcXVhc2lyYW5kb20oDQogICAgIHNpemUgPSAxLjIsDQogICAgIGFscGhhID0gLjI1LA0KICAgICB3aWR0aCA9IC4wNywNCiAgICkrDQogICBzY2FsZV94X2Rpc2NyZXRlKGxpbWl0cyA9IGMoIjg3Mzk4NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTgwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTUwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA1NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA2OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA5OTAwIiksDQogICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IGMoIlBNMSIsICJQTTIiLCAiUE0zIiwgIlBNNCIsICJQTTUiLCAiUE02IiwgIlBNNyIpDQogICApKw0KICAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwNCiAgICAgICAgICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgICAgICAgICAgYWVzKGdyb3VwPTEpLA0KICAgICAgICAgICAgICAgYWxwaGE9LjUsDQogICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgICAgICAgICBzaXplID0gMSkrDQogICB0aGVtZV9ncmFmcygpDQopDQpgYGANCg0KYGBge3IgR3LDoWZpY28gdHVyYiAzIHBlcmlvZG9zIGp1bnRvcywgd2FybmluZz1GQUxTRSwgbWVzc2FnZT1GQUxTRX0NCmdyaWQuYXJyYW5nZSh0dXJiX3AxLCB0dXJiX3AyLCB0dXJiX3AzLCBuY29sID0gMykNCmBgYA0KDQpgYGB7ciBTdW3DoXJpbyBUdXJiaWRleiwgd2FybmluZz1GQUxTRSwgbWVzc2FnZSA9IEZBTFNFLH0NCihzdW1fdHVyYl9wMSA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICBzZWxlY3QoQ09ESUdPLCB0dXJiaWRleiwgQU5PX0NPTEVUQSkgJT4lIA0KICAgZmlsdGVyKEFOT19DT0xFVEE+IjE5OTAiICYNCiAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDAwIikgJT4lIA0KICAgZ3JvdXBfYnkoQ09ESUdPKSAlPiUgDQogICBzdW1tYXJpemUoDQogICAgIG1pbiA9IA0KICAgICAgIG1pbih0dXJiaWRleiwgDQogICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIHExID0gDQogICAgICAgcXVhbnRpbGUodHVyYmlkZXosIDAuMjUsIA0KICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIG1lZGlhbiA9IA0KICAgICAgIG1lZGlhbih0dXJiaWRleiwgDQogICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIG1lYW4gPSANCiAgICAgICBtZWFuKHR1cmJpZGV6LCANCiAgICAgICAgICAgIG5hLnJtPSBUUlVFKSwNCiAgICAgcTMgPSANCiAgICAgICBxdWFudGlsZSh0dXJiaWRleiwgMC43NSwgDQogICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgbWF4ID0gDQogICAgICAgbWF4KHR1cmJpZGV6LCANCiAgICAgICAgICAgbmEucm0gPSBUUlVFKSkNCikNCg0KKHN1bV90dXJiX3AyIDwtIHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUNCiAgICBzZWxlY3QoQ09ESUdPLCB0dXJiaWRleiwgQU5PX0NPTEVUQSkgJT4lIA0KICAgIGZpbHRlcihBTk9fQ09MRVRBPiIyMDAwIiAmDQogICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMTAiKSAlPiUgDQogICAgZ3JvdXBfYnkoQ09ESUdPKSAlPiUgDQogICAgc3VtbWFyaXplKA0KICAgICAgbWluID0gDQogICAgICAgIG1pbih0dXJiaWRleiwgDQogICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgcTEgPSANCiAgICAgICAgcXVhbnRpbGUodHVyYmlkZXosIDAuMjUsIA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWVkaWFuID0gDQogICAgICAgIG1lZGlhbih0dXJiaWRleiwgDQogICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWVhbiA9IA0KICAgICAgICBtZWFuKHR1cmJpZGV6LCANCiAgICAgICAgICAgICBuYS5ybT0gVFJVRSksDQogICAgICBxMyA9IA0KICAgICAgICBxdWFudGlsZSh0dXJiaWRleiwgMC43NSwgDQogICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBtYXggPSANCiAgICAgICAgbWF4KHR1cmJpZGV6LCANCiAgICAgICAgICAgIG5hLnJtID0gVFJVRSkpDQopDQoNCihzdW1fdHVyYl9wMyA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgc2VsZWN0KENPRElHTywgdHVyYmlkZXosIEFOT19DT0xFVEEpICU+JSANCiAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMjAxMCIgJg0KICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDIwIikgJT4lIA0KICAgIGdyb3VwX2J5KENPRElHTykgJT4lIA0KICAgIHN1bW1hcml6ZSgNCiAgICAgIG1pbiA9IA0KICAgICAgICBtaW4odHVyYmlkZXosIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIHExID0gDQogICAgICAgIHF1YW50aWxlKHR1cmJpZGV6LCAwLjI1LCANCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lZGlhbiA9IA0KICAgICAgICBtZWRpYW4odHVyYmlkZXosIA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lYW4gPSANCiAgICAgICAgbWVhbih0dXJiaWRleiwgDQogICAgICAgICAgICAgbmEucm09IFRSVUUpLA0KICAgICAgcTMgPSANCiAgICAgICAgcXVhbnRpbGUodHVyYmlkZXosIDAuNzUsIA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWF4ID0gDQogICAgICAgIG1heCh0dXJiaWRleiwgDQogICAgICAgICAgICBuYS5ybSA9IFRSVUUpKQ0KKSANCmBgYA0KDQpgYGB7ciBTYWx2YW5kbyB0dXJiLCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlID0gRkFMU0UsfQ0KZ2dzYXZlKCJ0dXJiLnBuZyIsDQogICAgICAgdW5pdHMgPSBjKCJweCIpLA0KICAgICAgIHdpZHRoID0gNDUwMCwNCiAgICAgICBoZWlnaHQgPSAyOTkzLA0KICAgICAgIHBsb3QgPSB0dXJiLA0KICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogICAgICAgZHBpID0gMzAwLA0KICAgICAgIHR5cGUgPSAiY2Fpcm8iKQ0KDQpnZ3NhdmUoInR1cmJfcDEucG5nIiwNCiAgICAgICBwbG90ID0gdHVyYl9wMSwNCiAgICAgICBwYXRoID0gIi4vZ3JhZmljb3MiLA0KICAgICAgIGRwaSA9IDMwMCwNCiAgICAgICB0eXBlID0gImNhaXJvIikNCg0KZ2dzYXZlKCJ0dXJiX3AyLnBuZyIsDQogICAgICAgcGxvdCA9IHR1cmJfcDIsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgidHVyYl9wMy5wbmciLA0KICAgICAgIHBsb3QgPSB0dXJiX3AzLA0KICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogICAgICAgZHBpID0gMzAwLA0KICAgICAgIHR5cGUgPSAiY2Fpcm8iKQ0KDQpnZ3NhdmUoInR1cmJfM3BlcmlvZG9zLnBuZyIsDQogICAgICAgdW5pdHMgPSBjKCJweCIpLA0KICAgICAgIHdpZHRoID0gNDUwMCwNCiAgICAgICBoZWlnaHQgPSAyOTkzLA0KICAgICAgIHBsb3QgPSBncmlkLmFycmFuZ2UodHVyYl9wMSwgdHVyYl9wMiwgdHVyYl9wMywgbmNvbCA9IDMpLA0KICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogICAgICAgZHBpID0gMzAwLA0KICAgICAgIHR5cGUgPSAiY2Fpcm8iKQ0KYGBgDQoNCiMjIyBwSA0KDQpgYGB7ciBHcsOhZmljbyBwSCBmYWNldHRlZCwgZmlnLmNhcD0icEgtZ3JhdmF0YcOtIG5vIHBlcsOtb2RvIDE5OTAtMjAyMCIsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKHBIIDwtIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAsDQogICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICBwSCkpKw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPS1JbmYsDQogICAgICAgICAgICB5bWF4PTYsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2ViNTY2MSIpKyAjY2xhc3NlIDQNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj05LA0KICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2ViNTY2MSIpKyAjY2xhc3NlIDQNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj02LA0KICAgICAgICAgICAgeW1heD05LA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSkrDQogICBnZW9tX2JveHBsb3QoZmlsbD0nI0Y4RjhGRicsDQogICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICB3aWR0aD0gMC43KSsNCiAgIGZhY2V0X3dyYXAofnBlcmlvZG8pKw0KICAgbGFicyh0aXRsZSA9ICJwSCBubyBwZXLDrW9kbyAxOTkwLTIwMjAiLA0KICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICB5PSIiKSsNCiAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMC4wMSwgMC4wMSkpLA0KICAgICAgICAgICAgICAgICAgICAgIG4uYnJlYWtzID0gOCwNCiAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKDQsMTEpLA0KICAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IHNjYWxlczo6bnVtYmVyX2Zvcm1hdChhY2N1cmFjeSA9IDEsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlY2ltYWwubWFyayA9ICIsIiwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgYmlnLm1hcmsgPSAiICIpKSsNCiAgICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICBzaXplID0gMS4yLA0KICAgICBhbHBoYSA9IC4yNSwNCiAgICAgd2lkdGggPSAuMDcsDQogICApKw0KICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgKSsNCiAgIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsDQogICAgICAgICAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgIGFscGhhPS41LA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgdGhlbWVfZ3JhZnMoKQ0KKQ0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIHBIIHBlcmlvZG8xLCB3YXJuaW5nID0gRkFMU0UsIG1lc3NhZ2UgPSBGQUxTRX0NCihwSF9wMSA8LSBnZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMTk5MCIgJg0KICAgICAgICAgICAgICAgICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDAwIiksDQogICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICBwSCkpKw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPS1JbmYsDQogICAgICAgICAgICB5bWF4PTYsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2ViNTY2MSIpKyAjY2xhc3NlIDQNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj05LA0KICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2ViNTY2MSIpKyAjY2xhc3NlIDQNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj02LA0KICAgICAgICAgICAgeW1heD05LA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSkrDQogICBnZW9tX2JveHBsb3QoZmlsbD0nI0Y4RjhGRicsDQogICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICB3aWR0aD0gMC43KSsNCiAgIGxhYnModGl0bGUgPSAicEggbm8gcGVyw61vZG8gMTk5MC0yMDAwIiwNCiAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgeT0iIikrDQogICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAuMDEsIDAuMDEpKSwNCiAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDgsDQogICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYyg0LDExKSwNCiAgICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBzY2FsZXM6Om51bWJlcl9mb3JtYXQoYWNjdXJhY3kgPSAxLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZWNpbWFsLm1hcmsgPSAiLCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGJpZy5tYXJrID0gIiAiKSkrDQogICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgc2l6ZSA9IDEuMiwNCiAgICAgYWxwaGEgPSAuMjUsDQogICAgIHdpZHRoID0gLjA3LA0KICAgKSsNCiAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5ODAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDU1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gYygiUE0xIiwgIlBNMiIsICJQTTMiLCAiUE00IiwgIlBNNSIsICJQTTYiLCAiUE03IikNCiAgICkrDQogICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgICAgICAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSwNCiAgICAgICAgICAgICAgIHNpemUgPSAxKSsNCiAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBwSCBwZXJpb2RvMiwgd2FybmluZyA9IEZBTFNFLCBtZXNzYWdlID0gRkFMU0V9DQoocEhfcDIgPC0gZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUgDQogICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMDAiICYNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICBBTk9fQ09MRVRBPD0iMjAxMCIpLA0KICAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICAgcEgpKSsNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0tSW5mLA0KICAgICAgICAgICAgeW1heD02LA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNlYjU2NjEiKSsgI2NsYXNzZSA0DQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49OSwNCiAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNlYjU2NjEiKSsgI2NsYXNzZSA0DQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49NiwNCiAgICAgICAgICAgIHltYXg9OSwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgc3RhdF9ib3hwbG90KGdlb20gPSAnZXJyb3JiYXInLA0KICAgICAgICAgICAgICAgIHdpZHRoPTAuMywNCiAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgIGNvbG9yPSJibGFjayIsDQogICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgd2lkdGg9IDAuNykrDQogICBsYWJzKHRpdGxlID0gInBIIG5vIHBlcsOtb2RvIDIwMDAtMjAxMCIsDQogICAgICAgIHg9IkVzdGHDp8OjbyIsDQogICAgICAgIHk9IiIpKw0KICAgc2NhbGVfeV9jb250aW51b3VzKGV4cGFuZCA9IGV4cGFuc2lvbihtdWx0ID0gYygwLjAxLCAwLjAxKSksDQogICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSA4LA0KICAgICAgICAgICAgICAgICAgICAgIGxpbWl0cyA9IGMoNCwxMSksDQogICAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gc2NhbGVzOjpudW1iZXJfZm9ybWF0KGFjY3VyYWN5ID0gMSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGVjaW1hbC5tYXJrID0gIiwiLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBiaWcubWFyayA9ICIgIikpKw0KICAgIGdnYmVlc3dhcm06Omdlb21fcXVhc2lyYW5kb20oDQogICAgIHNpemUgPSAxLjIsDQogICAgIGFscGhhID0gLjI1LA0KICAgICB3aWR0aCA9IC4wNywNCiAgICkrDQogICBzY2FsZV94X2Rpc2NyZXRlKGxpbWl0cyA9IGMoIjg3Mzk4NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTgwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTUwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA1NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA2OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA5OTAwIiksDQogICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IGMoIlBNMSIsICJQTTIiLCAiUE0zIiwgIlBNNCIsICJQTTUiLCAiUE02IiwgIlBNNyIpDQogICApKw0KICAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwNCiAgICAgICAgICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgICAgICAgICAgYWVzKGdyb3VwPTEpLA0KICAgICAgICAgICAgICAgYWxwaGE9LjUsDQogICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgICAgICAgICBzaXplID0gMSkrDQogICB0aGVtZV9ncmFmcygpDQopDQpgYGANCg0KYGBge3IgR3LDoWZpY28gcEggcGVyaW9kbzMsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKHBIX3AzIDwtIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAgJT4lIA0KICAgICAgICAgICAgICAgICAgIGZpbHRlcihBTk9fQ09MRVRBPiIyMDEwIiAmDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMjAiKSwNCiAgICAgICAgICAgICAgICAgYWVzKENPRElHTywNCiAgICAgICAgICAgICAgICAgICAgIHBIKSkrDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49LUluZiwNCiAgICAgICAgICAgIHltYXg9NiwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjZWI1NjYxIikrICNjbGFzc2UgNA0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTksDQogICAgICAgICAgICB5bWF4PUluZiwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjZWI1NjYxIikrICNjbGFzc2UgNA0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTYsDQogICAgICAgICAgICB5bWF4PTksDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iIzhkY2RlYiIpKyAjY2xhc3NlIDENCiAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICB3aWR0aD0wLjMsDQogICAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuNjUpKSsNCiAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICBjb2xvcj0iYmxhY2siLA0KICAgICAgICAgICAgICAgIG91dGxpZXIuc2hhcGUgPSBOQSwgI3NlIGRlaXhhciBOQSBmaWNhIHPDsyBvIGppdHRlciwgc2UgbsOjbywgZGVpeGEgMQ0KICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcpKw0KICAgbGFicyh0aXRsZSA9ICJwSCBubyBwZXLDrW9kbyAyMDEwLTIwMjAiLA0KICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICB5PSIiKSsNCiAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMC4wMSwgMC4wMSkpLA0KICAgICAgICAgICAgICAgICAgICAgIG4uYnJlYWtzID0gOCwNCiAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKDQsMTEpLA0KICAgICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IHNjYWxlczo6bnVtYmVyX2Zvcm1hdChhY2N1cmFjeSA9IDEsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGRlY2ltYWwubWFyayA9ICIsIiwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgYmlnLm1hcmsgPSAiICIpKSsNCiAgICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICBzaXplID0gMS4yLA0KICAgICBhbHBoYSA9IC4yNSwNCiAgICAgd2lkdGggPSAuMDcsDQogICApKw0KICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgKSsNCiAgIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsDQogICAgICAgICAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgIGFscGhhPS41LA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgdGhlbWVfZ3JhZnMoKQ0KKQ0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIHBIIDMgcGVyaW9kb3MganVudG9zLCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlPUZBTFNFfQ0KZ3JpZC5hcnJhbmdlKHBIX3AxLCBwSF9wMiwgcEhfcDMsIG5jb2wgPSAzKQ0KYGBgDQoNCmBgYHtyIFN1bcOhcmlvIHBILCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlID0gRkFMU0UsfQ0KKHN1bV9wSF9wMSA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICBzZWxlY3QoQ09ESUdPLCBwSCwgQU5PX0NPTEVUQSkgJT4lIA0KICAgZmlsdGVyKEFOT19DT0xFVEE+IjE5OTAiICYNCiAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDAwIikgJT4lIA0KICAgZ3JvdXBfYnkoQ09ESUdPKSAlPiUgDQogICBzdW1tYXJpemUoDQogICAgIG1pbiA9IA0KICAgICAgIG1pbihwSCwgDQogICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIHExID0gDQogICAgICAgcXVhbnRpbGUocEgsIDAuMjUsIA0KICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIG1lZGlhbiA9IA0KICAgICAgIG1lZGlhbihwSCwgDQogICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIG1lYW4gPSANCiAgICAgICBtZWFuKHBILCANCiAgICAgICAgICAgIG5hLnJtPSBUUlVFKSwNCiAgICAgcTMgPSANCiAgICAgICBxdWFudGlsZShwSCwgMC43NSwgDQogICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgbWF4ID0gDQogICAgICAgbWF4KHBILCANCiAgICAgICAgICAgbmEucm0gPSBUUlVFKSkNCikNCg0KKHN1bV9wSF9wMiA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgc2VsZWN0KENPRElHTywgcEgsIEFOT19DT0xFVEEpICU+JSANCiAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMjAwMCIgJg0KICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDEwIikgJT4lIA0KICAgIGdyb3VwX2J5KENPRElHTykgJT4lIA0KICAgIHN1bW1hcml6ZSgNCiAgICAgIG1pbiA9IA0KICAgICAgICBtaW4ocEgsIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIHExID0gDQogICAgICAgIHF1YW50aWxlKHBILCAwLjI1LCANCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lZGlhbiA9IA0KICAgICAgICBtZWRpYW4ocEgsIA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lYW4gPSANCiAgICAgICAgbWVhbihwSCwgDQogICAgICAgICAgICAgbmEucm09IFRSVUUpLA0KICAgICAgcTMgPSANCiAgICAgICAgcXVhbnRpbGUocEgsIDAuNzUsIA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWF4ID0gDQogICAgICAgIG1heChwSCwgDQogICAgICAgICAgICBuYS5ybSA9IFRSVUUpKQ0KKSANCg0KKHN1bV9wSF9wMyA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgc2VsZWN0KENPRElHTywgcEgsIEFOT19DT0xFVEEpICU+JSANCiAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMjAxMCIgJg0KICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDIwIikgJT4lIA0KICAgIGdyb3VwX2J5KENPRElHTykgJT4lIA0KICAgIHN1bW1hcml6ZSgNCiAgICAgIG1pbiA9IA0KICAgICAgICBtaW4ocEgsIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIHExID0gDQogICAgICAgIHF1YW50aWxlKHBILCAwLjI1LCANCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lZGlhbiA9IA0KICAgICAgICBtZWRpYW4ocEgsIA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lYW4gPSANCiAgICAgICAgbWVhbihwSCwgDQogICAgICAgICAgICAgbmEucm09IFRSVUUpLA0KICAgICAgcTMgPSANCiAgICAgICAgcXVhbnRpbGUocEgsIDAuNzUsIA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWF4ID0gDQogICAgICAgIG1heChwSCwgDQogICAgICAgICAgICBuYS5ybSA9IFRSVUUpKQ0KKQ0KYGBgDQoNCmBgYHtyIFNhbHZhbmRvIHBILCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlID0gRkFMU0UsfQ0KZ2dzYXZlKCJwSC5wbmciLA0KICAgICAgIHVuaXRzID0gYygicHgiKSwNCiAgICAgICB3aWR0aCA9IDQ1MDAsDQogICAgICAgaGVpZ2h0ID0gMjk5MywNCiAgICAgICBwbG90ID0gcEgsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgicEhfcDEucG5nIiwNCiAgICAgICBwbG90ID0gcEhfcDEsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgicEhfcDIucG5nIiwNCiAgICAgICBwbG90ID0gcEhfcDIsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgicEhfcDMucG5nIiwNCiAgICAgICBwbG90ID0gcEhfcDMsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgicEhfM3BlcmlvZG9zLnBuZyIsDQogICAgICAgdW5pdHMgPSBjKCJweCIpLA0KICAgICAgIHdpZHRoID0gNDUwMCwNCiAgICAgICBoZWlnaHQgPSAyOTkzLA0KICAgICAgIHBsb3QgPSBncmlkLmFycmFuZ2UocEhfcDEsIHBIX3AyLCBwSF9wMywgbmNvbCA9IDMpLA0KICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogICAgICAgZHBpID0gMzAwLA0KICAgICAgIHR5cGUgPSAiY2Fpcm8iKQ0KYGBgDQoNCiMjIyBTw7NsaWRvcyB0b3RhaXMNCg0KYGBge3IgR3LDoWZpY28gU8OzbFRvdCBmYWNldHRlZCwgZmlnLmNhcD0ic8OzbGlkb3MtdG90YWlzLWdyYXZhdGHDrSBubyBwZXLDrW9kbyAxOTkwLTIwMjAiLCB3YXJuaW5nID0gRkFMU0UsIG1lc3NhZ2UgPSBGQUxTRX0NCihTb2xUb3QgPC0gZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCwNCiAgICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICAgc29saWRvc190b3RhaXMpKSsNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW4gPSAtSW5mLCB4bWF4ID0gSW5mLA0KICAgICAgICAgICAgeW1pbiA9IDUwMCwgeW1heCA9IEluZiwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0tSW5mLA0KICAgICAgICAgICAgeW1heD01MDAsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iIzhkY2RlYiIpKyAjY2xhc3NlIDENCiAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICB3aWR0aD0wLjMsDQogICAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuNjUpKSsNCiAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICBjb2xvcj0iYmxhY2siLA0KICAgICAgICAgICAgICAgIG91dGxpZXIuc2hhcGUgPSBOQSwgI3NlIGRlaXhhciBOQSBmaWNhIHPDsyBvIGppdHRlciwgc2UgbsOjbywgZGVpeGEgMQ0KICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcpKw0KICAgZmFjZXRfd3JhcCh+cGVyaW9kbykrDQogICBsYWJzKHRpdGxlID0gIlPDs2xpZG9zIHRvdGFpcyBubyBwZXLDrW9kbyAxOTkwLTIwMjAiLA0KICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICB5PSIiKSsNCiAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMC4wMSwgMC4wNSkpLA0KICAgICAgICAgICAgICAgICAgICAgIG4uYnJlYWtzID0gOCwNCiAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKDAsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBtYXgocGxhbl93aWRlXzE5OTAyMDIwJHNvbGlkb3NfdG90YWlzLCBuYS5ybSA9IFRSVUUpKSwNCiAgICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBzY2FsZXM6Om51bWJlcl9mb3JtYXQoYWNjdXJhY3kgPSAxLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZWNpbWFsLm1hcmsgPSAiLCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGJpZy5tYXJrID0gIiAiKSkrDQogICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICBzaXplID0gMS4yLA0KICAgICBhbHBoYSA9IC4yNSwNCiAgICAgd2lkdGggPSAuMDcsDQogICApKw0KICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgKSsNCiAgIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsDQogICAgICAgICAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgIGFscGhhPS41LA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgdGhlbWVfZ3JhZnMoKQ0KKQ0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIFPDs2xUb3QgcGVyaW9kbzEsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKFNvbFRvdF9wMSA8LSBnZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEE+IjE5OTAiICYNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMDAiKSwNCiAgICAgICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICAgICAgc29saWRvc190b3RhaXMpKSsNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW4gPSAtSW5mLCB4bWF4ID0gSW5mLA0KICAgICAgICAgICAgeW1pbiA9IDUwMCwgeW1heCA9IEluZiwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0tSW5mLA0KICAgICAgICAgICAgeW1heD01MDAsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iIzhkY2RlYiIpKyAjY2xhc3NlIDENCiAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICB3aWR0aD0wLjMsDQogICAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuNjUpKSsNCiAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICBjb2xvcj0iYmxhY2siLA0KICAgICAgICAgICAgICAgIG91dGxpZXIuc2hhcGUgPSBOQSwgI3NlIGRlaXhhciBOQSBmaWNhIHPDsyBvIGppdHRlciwgc2UgbsOjbywgZGVpeGEgMQ0KICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcpKw0KICAgbGFicyh0aXRsZSA9ICJTw7NsaWRvcyB0b3RhaXMgbm8gcGVyw61vZG8gMTk5MC0yMDAwIiwNCiAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgeT0iIikrDQogICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAuMDEsIDAuMDUpKSwNCiAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDgsDQogICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYygwLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbWF4KHBsYW5fd2lkZV8xOTkwMjAyMCRzb2xpZG9zX3RvdGFpcywgbmEucm0gPSBUUlVFKSksDQogICAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gc2NhbGVzOjpudW1iZXJfZm9ybWF0KGFjY3VyYWN5ID0gMSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGVjaW1hbC5tYXJrID0gIiwiLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBiaWcubWFyayA9ICIgIikpKw0KICAgIGdnYmVlc3dhcm06Omdlb21fcXVhc2lyYW5kb20oDQogICAgIHNpemUgPSAxLjIsDQogICAgIGFscGhhID0gLjI1LA0KICAgICB3aWR0aCA9IC4wNywNCiAgICkrDQogICBzY2FsZV94X2Rpc2NyZXRlKGxpbWl0cyA9IGMoIjg3Mzk4NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTgwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTUwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA1NTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA2OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA5OTAwIiksDQogICAgICAgICAgICAgICAgICAgIGxhYmVscyA9IGMoIlBNMSIsICJQTTIiLCAiUE0zIiwgIlBNNCIsICJQTTUiLCAiUE02IiwgIlBNNyIpDQogICApKw0KICAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwNCiAgICAgICAgICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgICAgICAgICAgYWVzKGdyb3VwPTEpLA0KICAgICAgICAgICAgICAgYWxwaGE9LjUsDQogICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgICAgICAgICBzaXplID0gMSkrDQogICB0aGVtZV9ncmFmcygpDQopDQpgYGANCg0KYGBge3IgR3LDoWZpY28gU8OzbFRvdCBwZXJpb2RvMiwgd2FybmluZyA9IEZBTFNFLCBtZXNzYWdlID0gRkFMU0V9DQooU29sVG90X3AyIDwtIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAgJT4lIA0KICAgICAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMjAwMCIgJg0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBBTk9fQ09MRVRBPD0iMjAxMCIpLA0KICAgICAgICAgICAgICAgICAgICAgYWVzKENPRElHTywNCiAgICAgICAgICAgICAgICAgICAgICAgICBzb2xpZG9zX3RvdGFpcykpKw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbiA9IC1JbmYsIHhtYXggPSBJbmYsDQogICAgICAgICAgICB5bWluID0gNTAwLCB5bWF4ID0gSW5mLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNhYzUwNzkiKSsgIz5waW9yIGNsYXNzZQ0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPS1JbmYsDQogICAgICAgICAgICB5bWF4PTUwMCwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgc3RhdF9ib3hwbG90KGdlb20gPSAnZXJyb3JiYXInLA0KICAgICAgICAgICAgICAgIHdpZHRoPTAuMywNCiAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgIGNvbG9yPSJibGFjayIsDQogICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgd2lkdGg9IDAuNykrDQogICBsYWJzKHRpdGxlID0gIlPDs2xpZG9zIHRvdGFpcyBubyBwZXLDrW9kbyAyMDAwLTIwMTAiLA0KICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICB5PSIiKSsNCiAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMC4wMSwgMC4wNSkpLA0KICAgICAgICAgICAgICAgICAgICAgIG4uYnJlYWtzID0gOCwNCiAgICAgICAgICAgICAgICAgICAgICBsaW1pdHMgPSBjKDAsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBtYXgocGxhbl93aWRlXzE5OTAyMDIwJHNvbGlkb3NfdG90YWlzLCBuYS5ybSA9IFRSVUUpKSwNCiAgICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBzY2FsZXM6Om51bWJlcl9mb3JtYXQoYWNjdXJhY3kgPSAxLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZWNpbWFsLm1hcmsgPSAiLCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGJpZy5tYXJrID0gIiAiKSkrDQogICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgICBzaXplID0gMS4yLA0KICAgICAgIGFscGhhID0gLjI1LA0KICAgICAgIHdpZHRoID0gLjA3LA0KICAgICkrDQogICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5ODAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3Mzk4OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDU1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIjg3NDA2OTAwIiwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gYygiUE0xIiwgIlBNMiIsICJQTTMiLCAiUE00IiwgIlBNNSIsICJQTTYiLCAiUE03IikNCiAgICApKw0KICAgIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsDQogICAgICAgICAgICAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgICAgICAgICAgICAgYWVzKGdyb3VwPTEpLA0KICAgICAgICAgICAgICAgIGFscGhhPS41LA0KICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSwNCiAgICAgICAgICAgICAgICBzaXplID0gMSkrDQogICAgdGhlbWVfZ3JhZnMoKQ0KKQ0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIFPDs2xUb3QgcGVyaW9kbzMsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKFNvbFRvdF9wMyA8LSBnZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgICAgICAgICAgICAgICAgICAgICAgIGZpbHRlcihBTk9fQ09MRVRBPiIyMDEwIiAmDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMjAiKSwNCiAgICAgICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICAgICAgc29saWRvc190b3RhaXMpKSsNCiAgICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluID0gLUluZiwgeG1heCA9IEluZiwNCiAgICAgICAgICAgIHltaW4gPSA1MDAsIHltYXggPSBJbmYsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2FjNTA3OSIpKyAjPnBpb3IgY2xhc3NlDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgICB5bWluPS1JbmYsDQogICAgICAgICAgICAgeW1heD01MDAsDQogICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcpKw0KICAgIGxhYnModGl0bGUgPSAiU8OzbGlkb3MgdG90YWlzIG5vIHBlcsOtb2RvIDIwMTAtMjAyMCIsDQogICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICAgeT0iIikrDQogICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAuMDEsIDAuMDUpKSwNCiAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDgsDQogICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYygwLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbWF4KHBsYW5fd2lkZV8xOTkwMjAyMCRzb2xpZG9zX3RvdGFpcywgbmEucm0gPSBUUlVFKSksDQogICAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gc2NhbGVzOjpudW1iZXJfZm9ybWF0KGFjY3VyYWN5ID0gMSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZGVjaW1hbC5tYXJrID0gIiwiLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBiaWcubWFyayA9ICIgIikpKw0KICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgc2l6ZSA9IDEuMiwNCiAgICAgYWxwaGEgPSAuMjUsDQogICAgIHdpZHRoID0gLjA3LA0KICAgKSsNCiAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5ODAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDU1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gYygiUE0xIiwgIlBNMiIsICJQTTMiLCAiUE00IiwgIlBNNSIsICJQTTYiLCAiUE03IikNCiAgICkrDQogICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgICAgICAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSwNCiAgICAgICAgICAgICAgIHNpemUgPSAxKSsNCiAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBTw7NsVG90IDMgcGVyaW9kb3MganVudG9zLCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlPUZBTFNFfQ0KZ3JpZC5hcnJhbmdlKFNvbFRvdF9wMSwgU29sVG90X3AyLCBTb2xUb3RfcDMsIG5jb2wgPSAzKQ0KYGBgDQoNCmBgYHtyIFN1bcOhcmlvIFPDs2xpZG9zIFRvdGFpcywgd2FybmluZz1GQUxTRSwgbWVzc2FnZSA9IEZBTFNFLH0NCihzdW1fU29sVG90X3AxIDwtIHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUNCiAgIHNlbGVjdChDT0RJR08sIHNvbGlkb3NfdG90YWlzLCBBTk9fQ09MRVRBKSAlPiUgDQogICBmaWx0ZXIoQU5PX0NPTEVUQT4iMTk5MCIgJg0KICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMDAiKSAlPiUgDQogICBncm91cF9ieShDT0RJR08pICU+JSANCiAgIHN1bW1hcml6ZSgNCiAgICAgbWluID0gDQogICAgICAgbWluKHNvbGlkb3NfdG90YWlzLCANCiAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgcTEgPSANCiAgICAgICBxdWFudGlsZShzb2xpZG9zX3RvdGFpcywgMC4yNSwgDQogICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgbWVkaWFuID0gDQogICAgICAgbWVkaWFuKHNvbGlkb3NfdG90YWlzLCANCiAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgbWVhbiA9IA0KICAgICAgIG1lYW4oc29saWRvc190b3RhaXMsIA0KICAgICAgICAgICAgbmEucm09IFRSVUUpLA0KICAgICBxMyA9IA0KICAgICAgIHF1YW50aWxlKHNvbGlkb3NfdG90YWlzLCAwLjc1LCANCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICBtYXggPSANCiAgICAgICBtYXgoc29saWRvc190b3RhaXMsIA0KICAgICAgICAgICBuYS5ybSA9IFRSVUUpKQ0KKQ0KDQooc3VtX1NvbFRvdF9wMiA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgc2VsZWN0KENPRElHTywgc29saWRvc190b3RhaXMsIEFOT19DT0xFVEEpICU+JSANCiAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMjAwMCIgJg0KICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDEwIikgJT4lIA0KICAgIGdyb3VwX2J5KENPRElHTykgJT4lIA0KICAgIHN1bW1hcml6ZSgNCiAgICAgIG1pbiA9IA0KICAgICAgICBtaW4oc29saWRvc190b3RhaXMsIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIHExID0gDQogICAgICAgIHF1YW50aWxlKHNvbGlkb3NfdG90YWlzLCAwLjI1LCANCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lZGlhbiA9IA0KICAgICAgICBtZWRpYW4oc29saWRvc190b3RhaXMsIA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lYW4gPSANCiAgICAgICAgbWVhbihzb2xpZG9zX3RvdGFpcywgDQogICAgICAgICAgICAgbmEucm09IFRSVUUpLA0KICAgICAgcTMgPSANCiAgICAgICAgcXVhbnRpbGUoc29saWRvc190b3RhaXMsIDAuNzUsIA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWF4ID0gDQogICAgICAgIG1heChzb2xpZG9zX3RvdGFpcywgDQogICAgICAgICAgICBuYS5ybSA9IFRSVUUpKQ0KKQ0KDQooc3VtX1NvbFRvdF9wMyA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgc2VsZWN0KENPRElHTywgc29saWRvc190b3RhaXMsIEFOT19DT0xFVEEpICU+JSANCiAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMjAxMCIgJg0KICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDIwIikgJT4lIA0KICAgIGdyb3VwX2J5KENPRElHTykgJT4lIA0KICAgIHN1bW1hcml6ZSgNCiAgICAgIG1pbiA9IA0KICAgICAgICBtaW4oc29saWRvc190b3RhaXMsIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIHExID0gDQogICAgICAgIHF1YW50aWxlKHNvbGlkb3NfdG90YWlzLCAwLjI1LCANCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lZGlhbiA9IA0KICAgICAgICBtZWRpYW4oc29saWRvc190b3RhaXMsIA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lYW4gPSANCiAgICAgICAgbWVhbihzb2xpZG9zX3RvdGFpcywgDQogICAgICAgICAgICAgbmEucm09IFRSVUUpLA0KICAgICAgcTMgPSANCiAgICAgICAgcXVhbnRpbGUoc29saWRvc190b3RhaXMsIDAuNzUsIA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWF4ID0gDQogICAgICAgIG1heChzb2xpZG9zX3RvdGFpcywgDQogICAgICAgICAgICBuYS5ybSA9IFRSVUUpKQ0KKQ0KYGBgDQoNCmBgYHtyIFNhbHZhbmRvIFNvbFRvdCwgd2FybmluZz1GQUxTRSwgbWVzc2FnZSA9IEZBTFNFLH0NCmdnc2F2ZSgiU29sVG90LnBuZyIsDQogICAgICAgdW5pdHMgPSBjKCJweCIpLA0KICAgICAgIHdpZHRoID0gNDUwMCwNCiAgICAgICBoZWlnaHQgPSAyOTkzLA0KICAgICAgIHBsb3QgPSBTb2xUb3QsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgiU29sVG90X3AxLnBuZyIsDQogICAgICAgcGxvdCA9IFNvbFRvdF9wMSwNCiAgICAgICBwYXRoID0gIi4vZ3JhZmljb3MiLA0KICAgICAgIGRwaSA9IDMwMCwNCiAgICAgICB0eXBlID0gImNhaXJvIikNCg0KZ2dzYXZlKCJTb2xUb3RfcDIucG5nIiwNCiAgICAgICBwbG90ID0gU29sVG90X3AyLA0KICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogICAgICAgZHBpID0gMzAwLA0KICAgICAgIHR5cGUgPSAiY2Fpcm8iKQ0KDQpnZ3NhdmUoIlNvbFRvdF9wMy5wbmciLA0KICAgICAgIHBsb3QgPSBTb2xUb3RfcDMsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgiU29sVG90XzNwZXJpb2Rvcy5wbmciLA0KICAgICAgIHVuaXRzID0gYygicHgiKSwNCiAgICAgICB3aWR0aCA9IDQ1MDAsDQogICAgICAgaGVpZ2h0ID0gMjk5MywNCiAgICAgICBwbG90ID0gZ3JpZC5hcnJhbmdlKFNvbFRvdF9wMSwgU29sVG90X3AyLCBTb2xUb3RfcDMsIG5jb2wgPSAzKSwNCiAgICAgICBwYXRoID0gIi4vZ3JhZmljb3MiLA0KICAgICAgIGRwaSA9IDMwMCwNCiAgICAgICB0eXBlID0gImNhaXJvIikNCmBgYA0KDQojIyMgSVFBDQoNCmBgYHtyIEdyw6FmaWNvIElRQSBmYWNldHRlZCwgZmlnLmNhcD0iaXFhLWdyYXZhdGHDrSBubyBwZXLDrW9kbyAxOTkwLTIwMjAiLCBlY2hvID0gRkFMU0UsIG1lc3NhZ2U9RkFMU0UsIHdhcm5pbmc9RkFMU0V9DQooaXFhIDwtZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCwNCiAgICAgICAgICAgICAgYWVzKENPRElHTywNCiAgICAgICAgICAgICAgICAgIElRQSwgbmEucm0gPSBUUlVFKSkrDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49LUluZiwNCiAgICAgICAgICAgIHltYXg9MjUsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2FjNTA3OSIpKyAjPnBpb3IgY2xhc3NlDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49MjUsDQogICAgICAgICAgICB5bWF4PTUwLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNlYjU2NjEiKSsgI2NsYXNzZSA0DQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49NTAsDQogICAgICAgICAgICB5bWF4PTcwLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNmY2Y3YWIiKSsgI2NsYXNzZSAzDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49NzAsDQogICAgICAgICAgICB5bWF4PTkwLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiM3MGMxOGMiKSsgI2NsYXNzZSAyDQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49OTAsDQogICAgICAgICAgICB5bWF4PUluZiwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgc3RhdF9ib3hwbG90KGdlb20gPSAnZXJyb3JiYXInLA0KICAgICAgICAgICAgICAgIHdpZHRoPTAuMywNCiAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSksDQogICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSsNCiAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICBjb2xvcj0iYmxhY2siLA0KICAgICAgICAgICAgICAgIG91dGxpZXIuc2hhcGUgPSBOQSwgI3NlIGRlaXhhciBOQSBmaWNhIHPDsyBvIGppdHRlciwgc2UgbsOjbywgZGVpeGEgMQ0KICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcsDQogICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSsNCiAgIGZhY2V0X3dyYXAofnBlcmlvZG8pKw0KICAgbGFicyh0aXRsZSA9ICJWYXJpYcOnw6NvIGRvIElRQSBubyBwZXLDrW9kbyAxOTkwLTIwMjAiLA0KICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICB5PSJJUUEiKSsNCiAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMCwwKSksDQogICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSA2LA0KICAgICAgICAgICAgICAgICAgICAgIGxpbWl0cyA9IGMoLTEsMTAxKSkrDQogICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICBzaXplID0gMS4yLA0KICAgICBhbHBoYSA9IC4yNSwNCiAgICAgd2lkdGggPSAuMDcsDQogICApKw0KICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgKSsNCiAgIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsDQogICAgICAgICAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgIGFscGhhPS41LA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgdGhlbWVfZ3JhZnMoKQ0KICAgIyB0aGVtZShheGlzLnRpdGxlLnkgPSBlbGVtZW50X2JsYW5rKCkpDQopDQpgYGANCg0KYGBge3IgR3LDoWZpY28gSVFBIHBlcmlvZG8xLCBlY2hvID0gRkFMU0UsIG1lc3NhZ2U9RkFMU0UsIHdhcm5pbmc9RkFMU0V9DQooaXFhX3AxIDwtZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUgDQogICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEEgPiAiMTk5MCIgJg0KICAgICAgICAgICAgICAgICAgICAgICAgICAgIEFOT19DT0xFVEEgPD0gIjIwMDAiKSwNCiAgICAgICAgICAgICAgICAgYWVzKENPRElHTywNCiAgICAgICAgICAgICAgICAgICAgIElRQSwgbmEucm0gPSBUUlVFKSkrDQogICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPS1JbmYsDQogICAgICAgICAgICB5bWF4PTI1LA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNhYzUwNzkiKSsgIz5waW9yIGNsYXNzZQ0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTI1LA0KICAgICAgICAgICAgeW1heD01MCwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjZWI1NjYxIikrICNjbGFzc2UgNA0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTUwLA0KICAgICAgICAgICAgeW1heD03MCwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjZmNmN2FiIikrICNjbGFzc2UgMw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTcwLA0KICAgICAgICAgICAgeW1heD05MCwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjNzBjMThjIikrICNjbGFzc2UgMg0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTkwLA0KICAgICAgICAgICAgeW1heD1JbmYsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iIzhkY2RlYiIpKyAjY2xhc3NlIDENCiAgICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgIHdpZHRoPTAuMywNCiAgICAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuNjUpLA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpKw0KICAgIGdlb21fYm94cGxvdChmaWxsPScjRjhGOEZGJywNCiAgICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgIHdpZHRoPSAwLjcsDQogICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSkrDQogICAgbGFicyh0aXRsZSA9ICJWYXJpYcOnw6NvIGRvIElRQSBubyBwZXLDrW9kbyAxOTkwLTIwMDAiLA0KICAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgIHk9IiIpKw0KICAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMCwwKSksDQogICAgICAgICAgICAgICAgICAgICAgIG4uYnJlYWtzID0gNiwNCiAgICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYygtMSwxMDEpKSsNCiAgICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICBzaXplID0gMS4yLA0KICAgICBhbHBoYSA9IC4yNSwNCiAgICAgd2lkdGggPSAuMDcsDQogICApKw0KICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgKSsNCiAgICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgIHNlPUZBTFNFLCAjc2UgZGVpeGFyIFRSVUUgZ2VyYSBvIGludGVydmFsbyBkZSBjb25maWFuw6dhIGRlIDk1JQ0KICAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUsDQogICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgdGhlbWVfZ3JhZnMoKSsNCiAgIHRoZW1lKGF4aXMudGl0bGUueSA9IGVsZW1lbnRfYmxhbmsoKSkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBJUUEgcGVyaW9kbzIsIGVjaG8gPSBGQUxTRSwgbWVzc2FnZT1GQUxTRSwgd2FybmluZz1GQUxTRX0NCihpcWFfcDIgPC1nZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQU5PX0NPTEVUQSA+ICIyMDAwIiAmDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQSA8PSAiMjAxMCIpLA0KICAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICAgSVFBLCBuYS5ybSA9IFRSVUUpKSsNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0tSW5mLA0KICAgICAgICAgICAgeW1heD0yNSwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0yNSwNCiAgICAgICAgICAgIHltYXg9NTAsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2ViNTY2MSIpKyAjY2xhc3NlIDQNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj01MCwNCiAgICAgICAgICAgIHltYXg9NzAsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2ZjZjdhYiIpKyAjY2xhc3NlIDMNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj03MCwNCiAgICAgICAgICAgIHltYXg9OTAsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iIzcwYzE4YyIpKyAjY2xhc3NlIDINCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj05MCwNCiAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSwNCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpKw0KICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgIGNvbG9yPSJibGFjayIsDQogICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgd2lkdGg9IDAuNywNCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpKw0KICAgbGFicyh0aXRsZSA9ICJWYXJpYcOnw6NvIGRvIElRQSBubyBwZXLDrW9kbyAyMDAwLTIwMTAiLA0KICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICB5PSIiKSsNCiAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMCwwKSksDQogICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSA2LA0KICAgICAgICAgICAgICAgICAgICAgIGxpbWl0cyA9IGMoLTEsMTAxKSkrDQogICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICBzaXplID0gMS4yLA0KICAgICBhbHBoYSA9IC4yNSwNCiAgICAgd2lkdGggPSAuMDcsDQogICApKw0KICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgKSsNCiAgIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsDQogICAgICAgICAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgIGFscGhhPS41LA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KIHRoZW1lX2dyYWZzKCkrDQogICB0aGVtZShheGlzLnRpdGxlLnkgPSBlbGVtZW50X2JsYW5rKCkNCiAgICkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBJUUEgcGVyaW9kbzMsIGVjaG8gPSBGQUxTRSwgbWVzc2FnZT1GQUxTRSwgd2FybmluZz1GQUxTRX0NCihpcWFfcDMgPC1nZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgICAgICAgICAgICAgICAgICBmaWx0ZXIoQU5PX0NPTEVUQSA+ICIyMDEwIiAmDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQSA8PSAiMjAyMCIpLA0KICAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICAgSVFBLCBuYS5ybSA9IFRSVUUpKSsNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0tSW5mLA0KICAgICAgICAgICAgeW1heD0yNSwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj0yNSwNCiAgICAgICAgICAgIHltYXg9NTAsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2ViNTY2MSIpKyAjY2xhc3NlIDQNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj01MCwNCiAgICAgICAgICAgIHltYXg9NzAsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iI2ZjZjdhYiIpKyAjY2xhc3NlIDMNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj03MCwNCiAgICAgICAgICAgIHltYXg9OTAsDQogICAgICAgICAgICBhbHBoYT0xLA0KICAgICAgICAgICAgZmlsbD0iIzcwYzE4YyIpKyAjY2xhc3NlIDINCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj05MCwNCiAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSwNCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpKw0KICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgIGNvbG9yPSJibGFjayIsDQogICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgd2lkdGg9IDAuNywNCiAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpKw0KICAgbGFicyh0aXRsZSA9ICJWYXJpYcOnw6NvIGRvIElRQSBubyBwZXLDrW9kbyAyMDEwLTIwMjAiLA0KICAgICAgICB4PSJFc3Rhw6fDo28iLA0KICAgICAgICB5PSIiKSsNCiAgIHNjYWxlX3lfY29udGludW91cyhleHBhbmQgPSBleHBhbnNpb24obXVsdCA9IGMoMCwwKSksDQogICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSA2LA0KICAgICAgICAgICAgICAgICAgICAgIGxpbWl0cyA9IGMoLTEsMTAxKSkrDQogICBnZ2JlZXN3YXJtOjpnZW9tX3F1YXNpcmFuZG9tKA0KICAgICBzaXplID0gMS4yLA0KICAgICBhbHBoYSA9IC4yNSwNCiAgICAgd2lkdGggPSAuMDcsDQogICApKw0KICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk4MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzM5ODk1MCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNTUwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwNjkwMCIsIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICI4NzQwOTkwMCIpLA0KICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBjKCJQTTEiLCAiUE0yIiwgIlBNMyIsICJQTTQiLCAiUE01IiwgIlBNNiIsICJQTTciKQ0KICAgKSsNCiAgIGdlb21fc21vb3RoKG1ldGhvZCA9ICJsbSIsDQogICAgICAgICAgICAgICBzZT1GQUxTRSwgI3NlIGRlaXhhciBUUlVFIGdlcmEgbyBpbnRlcnZhbG8gZGUgY29uZmlhbsOnYSBkZSA5NSUNCiAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiAgICAgICAgICAgICAgIGFscGhhPS41LA0KICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFLA0KICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KICAgIHRoZW1lX2dyYWZzKCkrDQogICAgdGhlbWUoYXhpcy50aXRsZS55ID0gZWxlbWVudF9ibGFuaygpKQ0KKQ0KYGBgDQoNCmBgYHtyIEdyw6FmaWNvIElRQSAzIHBlcmlvZG9zIGp1bnRvcywgd2FybmluZz1GQUxTRSwgbWVzc2FnZT1GQUxTRX0NCmdyaWQuYXJyYW5nZShpcWFfcDEsIGlxYV9wMiwgaXFhX3AzLCBuY29sID0gMykNCmBgYA0KDQpgYGB7ciBTdW3DoXJpbyBJUUEsIHdhcm5pbmc9RkFMU0UsIG1lc3NhZ2UgPSBGQUxTRSx9DQooc3VtX0lRQV9wMSA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICBzZWxlY3QoQ09ESUdPLCBJUUEsIEFOT19DT0xFVEEpICU+JSANCiAgIGZpbHRlcihBTk9fQ09MRVRBPiIxOTkwIiAmDQogICAgICAgICAgICBBTk9fQ09MRVRBPD0iMjAwMCIpICU+JSANCiAgIGdyb3VwX2J5KENPRElHTykgJT4lIA0KICAgc3VtbWFyaXplKA0KICAgICBtaW4gPSANCiAgICAgICBtaW4oSVFBLCANCiAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgcTEgPSANCiAgICAgICBxdWFudGlsZShJUUEsIDAuMjUsIA0KICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIG1lZGlhbiA9IA0KICAgICAgIG1lZGlhbihJUUEsIA0KICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICBtZWFuID0gDQogICAgICAgbWVhbihJUUEsIA0KICAgICAgICAgICAgbmEucm09IFRSVUUpLA0KICAgICBxMyA9IA0KICAgICAgIHF1YW50aWxlKElRQSwgMC43NSwgDQogICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgbWF4ID0gDQogICAgICAgbWF4KElRQSwgDQogICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIG4gPSANCiAgICAgICAgbGVuZ3RoKElRQSkNCiAgICkNCikNCg0KKHN1bV9JUUFfcDIgPC0gcGxhbl93aWRlXzE5OTAyMDIwICU+JQ0KICAgIHNlbGVjdChDT0RJR08sIElRQSwgQU5PX0NPTEVUQSkgJT4lIA0KICAgIGZpbHRlcihBTk9fQ09MRVRBPiIyMDAwIiAmDQogICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMTAiKSAlPiUgDQogICAgZ3JvdXBfYnkoQ09ESUdPKSAlPiUgDQogICAgc3VtbWFyaXplKA0KICAgICAgbWluID0gDQogICAgICAgIG1pbihJUUEsIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIHExID0gDQogICAgICAgIHF1YW50aWxlKElRQSwgMC4yNSwgDQogICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBtZWRpYW4gPSANCiAgICAgICAgbWVkaWFuKElRQSwgDQogICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWVhbiA9IA0KICAgICAgICBtZWFuKElRQSwgDQogICAgICAgICAgICAgbmEucm09IFRSVUUpLA0KICAgICAgcTMgPSANCiAgICAgICAgcXVhbnRpbGUoSVFBLCAwLjc1LCANCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1heCA9IA0KICAgICAgICBtYXgoSVFBLCANCiAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBuID0gDQogICAgICAgIGxlbmd0aChJUUEpDQogICAgICApDQopDQoNCihzdW1fSVFBX3AzIDwtIHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUNCiAgICBzZWxlY3QoQ09ESUdPLCBJUUEsIEFOT19DT0xFVEEpICU+JSANCiAgICBmaWx0ZXIoQU5PX0NPTEVUQT4iMjAxMCIgJg0KICAgICAgICAgICAgIEFOT19DT0xFVEE8PSIyMDIwIikgJT4lDQogICAgIyA/YXNfZmFjdG9yKENPRElHTykgJT4lIA0KICAgIGdyb3VwX2J5KENPRElHTykgJT4lDQogICAgc3VtbWFyaXplKA0KICAgICAgbWluID0gDQogICAgICAgIG1pbihJUUEsIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIHExID0gDQogICAgICAgIHF1YW50aWxlKElRQSwgMC4yNSwgDQogICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBtZWRpYW4gPSANCiAgICAgICAgbWVkaWFuKElRQSwgDQogICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWVhbiA9IA0KICAgICAgICBtZWFuKElRQSwgDQogICAgICAgICAgICAgbmEucm09IFRSVUUpLA0KICAgICAgcTMgPSANCiAgICAgICAgcXVhbnRpbGUoSVFBLCAwLjc1LCANCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1heCA9IA0KICAgICAgICBtYXgoSVFBLCANCiAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBuID0gDQogICAgICAgIGxlbmd0aChJUUEpLA0KICAgICAgTkFzID0gDQogICAgICAgIHN1bShpcy5uYShJUUEpKQ0KICAgICAgKSAlPiUgDQogIG11dGF0ZSgNCiAgICAiJU5BIiA9IE5Bcy9uKjEwMA0KICApDQopDQoNCmBgYA0KDQpgYGB7ciBTYWx2YW5kbyBpcWEsIHdhcm5pbmc9RkFMU0UsIG1lc3NhZ2UgPSBGQUxTRSx9DQpnZ3NhdmUoImlxYS5wbmciLA0KICAgICAgIHVuaXRzID0gYygicHgiKSwNCiAgICAgICB3aWR0aCA9IDQ1MDAsDQogICAgICAgaGVpZ2h0ID0gMjk5MywNCiAgICAgICBwbG90ID0gaXFhLA0KICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogICAgICAgZHBpID0gMzAwLA0KICAgICAgIHR5cGUgPSAiY2Fpcm8iKQ0KDQpnZ3NhdmUoImlxYV9wMS5wbmciLA0KICAgICAgIHBsb3QgPSBpcWFfcDEsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgiaXFhX3AyLnBuZyIsDQogICAgICAgcGxvdCA9IGlxYV9wMiwNCiAgICAgICBwYXRoID0gIi4vZ3JhZmljb3MiLA0KICAgICAgIGRwaSA9IDMwMCwNCiAgICAgICB0eXBlID0gImNhaXJvIikNCg0KZ2dzYXZlKCJpcWFfcDMucG5nIiwNCiAgICAgICBwbG90ID0gaXFhX3AzLA0KICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogICAgICAgZHBpID0gMzAwLA0KICAgICAgIHR5cGUgPSAiY2Fpcm8iKQ0KDQpnZ3NhdmUoImlxYV8zcGVyaW9kb3MucG5nIiwNCiAgICAgICB1bml0cyA9IGMoInB4IiksDQogICAgICAgd2lkdGggPSA0NTAwLA0KICAgICAgIGhlaWdodCA9IDI5OTMsDQogICAgICAgcGxvdCA9IGdyaWQuYXJyYW5nZShpcWFfcDEsIGlxYV9wMiwgaXFhX3AzLCBuY29sID0gMyksDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQpgYGANCg0KIyMgVGVzdGFuZG8gY29pc2FzDQoNCmBgYHtyIFRlc3RhbmRvIGNvaXNhcywgaW5jbHVkZSA9IEZBTFNFLCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlID0gRkFMU0UsfQ0KIyBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lIA0KIyAgICBzZWxlY3QoQ09ESUdPLCBveGlnZW5pb19kaXNzb2x2aWRvLCBBTk9fQ09MRVRBKSAlPiUgDQojICAgIGdncGxvdChhZXMoQU5PX0NPTEVUQSwgb3hpZ2VuaW9fZGlzc29sdmlkbywgDQojICAgICAgIGNvbCA9IENPRElHTykpKw0KIyAgICBnZW9tX2xpbmUoKSsNCiMgICAgZmFjZXRfd3JhcCh+IENPRElHTywgbmNvbCA9IDcpDQoNCiMgZGYxMTEgPC0gZGF0YS5mcmFtZSh4ID0gYygxOjEwMCkpDQojIGdsaW1wc2UoZGYxMTEpDQojIGRmMTExJHkgPC0gMiArIDMgKiBkZjExMSR4ICsgcm5vcm0oMTAwLCBzZCA9IDQwKQ0KIyANCiMgbG1fZXFuIDwtIGZ1bmN0aW9uKGRmMTExKXsNCiMgICAgIG0gPC0gbG0oeSB+IHgsIGRmMTExKTsNCiMgICAgIGVxIDwtIHN1YnN0aXR1dGUoeSA9PSBhICsgYiAlLiUgeCoiLCJ+fnJeMn4iPSJ+cjIsDQojICAgICAgICAgIGxpc3QoYSA9IGZvcm1hdCh1bm5hbWUoY29lZihtKVsxXSksIGRpZ2l0cyA9IDIpLA0KIyAgICAgICAgICAgICAgIGIgPSBmb3JtYXQodW5uYW1lKGNvZWYobSlbMl0pLCBkaWdpdHMgPSAyKSwNCiMgICAgICAgICAgICAgIHIyID0gZm9ybWF0KHN1bW1hcnkobSkkci5zcXVhcmVkLCBkaWdpdHMgPSAzKSkpDQojICAgICBhcy5jaGFyYWN0ZXIoYXMuZXhwcmVzc2lvbihlcSkpOw0KIyB9IA0KIyBwMiA8LSBwMTExICsNCiMgICBnZW9tX3RleHQoeCA9IDI1LCB5ID0gMzAwLA0KIyAgICAgICAgICAgICBsYWJlbCA9IGxtX2VxbihkZjExMSksDQojICAgICAgICAgICAgIHBhcnNlID0gVFJVRSkNCiMgcDINCiMgDQojIA0KIyBsbV9lcWMgPC0gZnVuY3Rpb24ocGxhbl93aWRlXzE5OTAyMDIwKXsNCiMgICAgbSA8LSBsbShveGlnZW5pb19kaXNzb2x2aWRvIH4gQ09ESUdPLCBwbGFuX3dpZGVfMTk5MDIwMjApOw0KIyAgICBlcSA8LSBzdWJzdGl0dXRlKHkgPT0gYSArIGIgJS4lIHgqIiwifn5yXjJ+Ij0ifnIyLA0KIyAgICAgICAgICAgICAgICAgICAgIGxpc3QoYSA9IGZvcm1hdCh1bm5hbWUoY29lZihtKVsxXSksIGRpZ2l0cyA9IDIpLA0KIyAgICAgICAgICAgICAgICAgICAgICAgICAgYiA9IGZvcm1hdCh1bm5hbWUoY29lZihtKVsyXSksIGRpZ2l0cyA9IDIpLA0KIyAgICAgICAgICAgICAgICAgICAgICAgICAgcjIgPSBmb3JtYXQoc3VtbWFyeShtKSRyLnNxdWFyZWQsIGRpZ2l0cyA9IDMpKSkNCiMgICAgYXMuY2hhcmFjdGVyKGFzLmV4cHJlc3Npb24oZXEpKTsNCiMgfQ0KIyANCiMgKG9kX3AxIDwtZ2dwbG90KHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUNCiMgICAgICAgICAgICAgICAgICAgIGZpbHRlcihBTk9fQ09MRVRBPiIxOTkwIiAmDQojICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMDAiKSwNCiMgICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQojICAgICAgICAgICAgICAgICAgICAgb3hpZ2VuaW9fZGlzc29sdmlkbykpKw0KIyAgICAgICBhbm5vdGF0ZSgicmVjdCIsDQojICAgICAgICAgICAgICAgIHhtaW49LUluZiwNCiMgICAgICAgICAgICAgICAgeG1heD1JbmYsDQojICAgICAgICAgICAgICAgIHltaW49LUluZiwNCiMgICAgICAgICAgICAgICAgeW1heD0yLA0KIyAgICAgICAgICAgICAgICBhbHBoYT0xLA0KIyAgICAgICAgICAgICAgICBmaWxsPSIjYWM1MDc5IikrICM+cGlvciBjbGFzc2UNCiMgICAgICAgYW5ub3RhdGUoInJlY3QiLA0KIyAgICAgICAgICAgICAgICB4bWluPS1JbmYsDQojICAgICAgICAgICAgICAgIHhtYXg9SW5mLA0KIyAgICAgICAgICAgICAgICB5bWluPTIsDQojICAgICAgICAgICAgICAgIHltYXg9NCwNCiMgICAgICAgICAgICAgICAgYWxwaGE9MSwNCiMgICAgICAgICAgICAgICAgZmlsbD0iI2ViNTY2MSIpKyAjY2xhc3NlIDQNCiMgICAgICAgYW5ub3RhdGUoInJlY3QiLA0KIyAgICAgICAgICAgICAgICB4bWluPS1JbmYsDQojICAgICAgICAgICAgICAgIHhtYXg9SW5mLA0KIyAgICAgICAgICAgICAgICB5bWluPTQsDQojICAgICAgICAgICAgICAgIHltYXg9NSwNCiMgICAgICAgICAgICAgICAgYWxwaGE9MSwNCiMgICAgICAgICAgICAgICAgZmlsbD0iI2ZjZjdhYiIpKyAjY2xhc3NlIDMNCiMgICAgICAgYW5ub3RhdGUoInJlY3QiLA0KIyAgICAgICAgICAgICAgICB4bWluPS1JbmYsDQojICAgICAgICAgICAgICAgIHhtYXg9SW5mLA0KIyAgICAgICAgICAgICAgICB5bWluPTUsDQojICAgICAgICAgICAgICAgIHltYXg9NiwNCiMgICAgICAgICAgICAgICAgYWxwaGE9MSwNCiMgICAgICAgICAgICAgICAgZmlsbD0iIzcwYzE4YyIpKyAjY2xhc3NlIDINCiMgICAgICAgYW5ub3RhdGUoInJlY3QiLA0KIyAgICAgICAgICAgICAgICB4bWluPS1JbmYsDQojICAgICAgICAgICAgICAgIHhtYXg9SW5mLA0KIyAgICAgICAgICAgICAgICB5bWluPTYsDQojICAgICAgICAgICAgICAgIHltYXg9SW5mLA0KIyAgICAgICAgICAgICAgICBhbHBoYT0xLA0KIyAgICAgICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KIyAgICAgICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQojICAgICAgICAgICAgICAgICAgICB3aWR0aD0wLjMsDQojICAgICAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KIyAgICAgICBnZW9tX2JveHBsb3QoZmlsbD0nI0Y4RjhGRicsDQojICAgICAgICAgICAgICAgICAgICBjb2xvcj0iYmxhY2siLA0KIyAgICAgICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQojICAgICAgICAgICAgICAgICAgICB3aWR0aD0gMC43KSsNCiMgICAgICAgbGFicyh0aXRsZSA9ICJPeGlnw6puaW8gRGlzc29sdmlkbyBubyBwZXLDrW9kbyAxOTkwLTIwMDAiLA0KIyAgICAgICAgICAgIHg9IkVzdGHDp8OjbyIsDQojICAgICAgICAgICAgeT0ibWcvTCIpKw0KIyAgICAgICAjIGdlb21faml0dGVyKHdpZHRoID0gLjA1LA0KIyAgICAgICAjICAgICAgICAgICAgIGFscGhhPS4yLA0KIyAgICAgICAjICAgICAgICAgICAgIHNpemU9MS41LA0KIyAgICAgICAjICAgICAgICAgICAgIGNvbG9yPSJibGFjayIpKw0KIyAgICAgICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAsMCkpLA0KIyAgICAgICAgICAgICAgICAgICAgICAgICAgbi5icmVha3MgPSAxMSwNCiMgICAgICAgICAgICAgICAgICAgICAgICAgIGxpbWl0cyA9IGMoLTEsMjEpKSsNCiMgICAgICAgc2NhbGVfeF9kaXNjcmV0ZShsaW1pdHMgPSBjKCI4NzM5ODUwMCIsICI4NzM5ODk4MCIsICI4NzM5ODkwMCIsICI4NzM5ODk1MCIsICI4NzQwNTUwMCIsICI4NzQwNjkwMCIsICI4NzQwOTkwMCIpKSsNCiMgICAgICAgZ2VvbV9zbW9vdGgobWV0aG9kID0gImxtIiwNCiMgICAgICAgICAgICAgICAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQojICAgICAgICAgICAgICAgICAgIGFlcyhncm91cD0xKSwNCiMgICAgICAgICAgICAgICAgICAgYWxwaGE9LjUsDQojICAgICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSwNCiMgICAgICAgICAgICAgICAgICAgc2l6ZSA9IDEpKw0KIyAgICAgICAjIGFubm90YXRlKGdlb21fdGV4dChhZXMoeCA9ICI4NzQwNTUwMCIsIHkgPSAxNSksDQojICAgICAgICMgICAgICAgICAgICAgICAgICAgIGxhYmVsID0gbG1fZXFjKHBsYW5fd2lkZV8xOTkwMjAyMCksDQojICAgICAgICMgICAgICAgICAgICAgICAgICAgIHBhcnNlID0gVFJVRSwNCiMgICAgICAgIyAgICAgICAgICAgICAgICAgICAgaW5oZXJpdC5hZXMgPSBUUlVFLA0KIyAgICAgICAjICAgICAgICAgICAgICAgICAgICBjaGVja19vdmVybGFwID0gVFJVRSkpKw0KIyAgICAgICAjICBnZW9tX2xpbmUoDQojICAgICAgICMgICAgIGFlcyhjb2xvcj0icmVkIiksDQojICAgICAgICMgICAgIGFscGhhPS4wLA0KIyAgICAgICAjICkrDQojICAgICAgICMgc2NhbGVfY29sb3JfbWFudWFsKCJMZWdlbmRhIiwNCiMgICAgICAgIyAgICAgICAgICAgICAgICAgICAgZ3VpZGU9ImxlZ2VuZCIsDQojICAgICAgICMgICAgICAgICAgICAgICAgICAgIHZhbHVlcyA9IGMoIkNsYXNzZSAxIj0iIzhkY2RlYiIsDQojICAgICAgICMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIkNsYXNzZSAyIj0iIzcwYzE4YyIsDQojICAgICAgICMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIkNsYXNzZSAzIj0iI2ZjZjdhYiIsDQojICAgICAgICMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIkNsYXNzZSA0Ij0iI2ViNTY2MSIsDQojICAgICAgICMgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIlBpb3IgQ2xhc3NlIj0iI2FjNTA3OSIpKSsNCiMgICAgIyBndWlkZXMoY29sb3I9Z3VpZGVfbGVnZW5kKG92ZXJyaWRlLmFlcyA9IGxpc3QobGluZXR5cGU9YygxLDEsMSwxLDEpLA0KIyAgICAjICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBsd2Q9YygyLDIsMiwyLDIpLA0KIyAgICAjICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBzaGFwZT1jKE5BLE5BLE5BLE5BLE5BKSwNCiMgICAgIyAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgYWxwaGE9MSkpKSsNCiMgICAgICAgdGhlbWUobGVnZW5kLnBvc2l0aW9uID0gImJvdHRvbSIpKw0KIyAgICAgICB0aGVtZV9jbGFzc2ljKCkpDQoNCiMgbGlzdDExMTEgPC0gc2Vzc2lvbkluZm8oKQ0KIyBsaXN0MTExMSRsb2FkZWRPbmx5DQoNCiMgaW5zdGFsbC5wYWNrYWdlcygiZ2dwbWlzYyIpDQojIGxpYnJhcnkoZ2dwbWlzYykNCg0KIyBzdW1tYXJ5KGxtKHBsYW5fd2lkZV8xOTkwMjAyMCRDT0RJR09+cGxhbl93aWRlXzE5OTAyMDIwJERCTykpDQojIA0KIyANCiMgcCA8LSBnZ3Bsb3QoZGF0YSwgYWVzKHk9bnVtYmVyLCB4PXBvZCkpICsNCiMgICBnZW9tX2JveHBsb3QoKQ0KIyBwcmludChwKQ0KDQojIGluc3RhbGwucGFja2FnZXMoIkdHYWxseSIpDQoNCg0KIyBmaXQgPSBsbShwbGFuX3dpZGVfMTk5MDIwMjAkb3hpZ2VuaW9fZGlzc29sdmlkb34gcGxhbl93aWRlXzE5OTAyMDIwJENPRElHTykNCiMgc3VtbWFyeShmaXQpDQojIHN1bW1hcnkubG0oZml0KQ0KIyANCiMgcGFjbWFuOjpwX2xvYWQoZXNxdWlzc2UpDQoNCiMgc3VtYXJpbyA8LSBmdW5jdGlvbih4LCB5KXsNCiMgICB4ICU+JSANCiMgICAgIGdyb3VwX2J5KENPRElHTykgJT4lDQojICAgICBzdW1tYXJpc2UoDQojICAgICAgIGxpc3QobWluPSB+bWluKHksIG5hLnJtID0gVFJVRSksIA0KIyAgICAgICAgICAgIFExPSB+cXVhbnRpbGUoeSwgcHJvYnMgPSAwLjI1KSwNCiMgICAgICAgICAgICBtZWRpYW49IH5tZWRpYW4oeSwgbmEucm0gPSBUUlVFKSwgDQojICAgICAgICAgICAgUTM9IH5xdWFudGlsZSh5LCBwcm9icyA9IDAuNzUpLA0KIyAgICAgICAgICAgIG1heD0gfm1heCh5LCBuYS5ybSA9IFRSVUUpKSwNCiMgICAgICAgLmdyb3VwcyA9ICJkcm9wIg0KIyAgICAgICApDQojIH0NCmBgYA0KDQojIyMgQ29ycmVsYcOnw6NvDQoNCmBgYHtyIENvcnJlbGHDp8OjbywgZmlnLmNhcD0iY29ycmVsYcOnw6NvLXBhcmFtZXRyb3MtcXVhbGlkYWRlLWFndWEtZ3JhdmF0YcOtIG5vIHBlcsOtb2RvIDE5OTAtMjAyMCIsIHRpbWVfaXQgPSBUUlVFLCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlID0gRkFMU0UsfQ0KcGFyYW1ldHJvc19JUUEgJT4lIA0KICBkcGx5cjo6c2VsZWN0KA0KICAgIC1DT0RJR08sDQogICAgLW5pdHJvX3RvdGFsKSAlPiUgDQogICMgZ3JvdXBfYnkoQ09ESUdPKSAlPiUgDQogIHJlbmFtZSgNCiAgICBDRSA9IENvbmR1dGl2aWRhZGUsDQogICAgT0QgPSBveGlnZW5pb19kaXNzb2x2aWRvLA0KICAgIFNUID0gc29saWRvc190b3RhaXMsDQogICAgVHVyYiA9IHR1cmJpZGV6LA0KICAgIFRlbXAgPSB0ZW1wX2FndWEsDQogICAgUHRvdCA9IGZvc2Zvcm9fdG90YWwsDQogICAgTkFtb24gPSBuaXRyb19hbW9uLA0KICAgIE5USyA9IG5pdHJvX2tqZWxkYWhsDQogICkgJT4lIA0KICBnZ2NvcnIoDQogICAgbWV0aG9kID0gImNvbXBsZXRlLm9icyIsDQogICAgIyAicGVhcnNvbiIsDQogICAgIyAicGFpcndpc2UiLA0KICAgIG5hbWUgPSAiQ29ycmVsYcOnw6NvIiwNCiAgICBsYWJlbCA9IFRSVUUsDQogICAgbGFiZWxfYWxwaGEgPSBUUlVFLA0KICAgIGRpZ2l0cyA9IDMsDQogICAgbG93ID0gIiMzQjlBQjIiLA0KICAgIG1pZCA9ICIjRUVFRUVFIiwNCiAgICBoaWdoID0gIiNGMjFBMDAiLA0KICAgICMgcGFsZXR0ZSA9ICJSZFlsQnUiLA0KICAgIGxheW91dC5leHAgPSAwLA0KICAgIGxlZ2VuZC5wb3NpdGlvbiA9ICJsZWZ0IiwNCiAgICBsYWJlbF9yb3VuZCA9IDMsDQogICAgIyBsZWdlbmQuc2l6ZSA9IDE4LA0KICAgIGdlb20gPSAidGlsZSIsDQogICAgbmJyZWFrcyA9IDEwLA0KICApKw0KICBsYWJzKHRpdGxlID0gIkNvcnJlbGHDp8OjbyBlbnRyZSBwYXLDom1ldHJvcyBmw61zaWNvLXF1w61taWNvcyBuYVxuQmFjaWEgSGlkcm9ncsOhZmljYSBkbyByaW8gR3JhdmF0YcOtIG5vIHBlcsOtb2RvIDE5OTAtMjAyMCIpKw0KICB0aGVtZV9saW5lZHJhdygpKw0KICB0aGVtZSgNCiAgICBsZWdlbmQucG9zaXRpb24gPSBjKDAuMTUsIDAuNiksDQogICAgbGVnZW5kLnRpdGxlID0gZWxlbWVudF90ZXh0KHNpemUgPSAxNiksDQogICAgbGVnZW5kLnRleHQgPSBlbGVtZW50X3RleHQoc2l6ZSA9IDE0KSwNCiAgICAjIGxlZ2VuZC5zcGFjaW5nID0gdW5pdChlbGVtZW50X3RleHQoKSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgIyB1bml0cyA9IDUpDQogICAgcGxvdC50aXRsZSA9IGVsZW1lbnRfdGV4dChoanVzdCA9IDAuNSwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIHNpemUgPSAxNikNCiAgKQ0KDQojIEdyw6FmaWNvIGRhcyBjb3JyZWxhw6fDtWVzIGVudHJlIHRvZG9zIG9zIHBhcsOibWV0cm9zIGNvbSBzaWduaWZpY8OibmNpYQ0KY29ycmVsX0lRQSA8LSBwYXJhbWV0cm9zX0lRQSAlPiUNCiAgZHBseXI6OnNlbGVjdCgtQ09ESUdPKSAlPiUNCiAgZ2dwYWlycyh0aXRsZSA9ICJDb3JyZWxhw6fDo28gZW50cmUgcGFyw6JtZXRyb3MgcXVlIGNvbXDDtWVtIG8gSVFBIiwNCiAgICAgICAgICBheGlzTGFiZWxzID0gInNob3ciKQ0KDQpjb3JyZWxhY2FvX3BJUUEgPC0gcGFyYW1ldHJvc19JUUEgJT4lIA0KICBncm91cF9ieShDT0RJR08pICU+JSANCiAgY29ycmVsYXRpb246OmNvcnJlbGF0aW9uKCkNCg0KY29ycmVsYWNhb19wSVFBICU+JSANCiAgIyBnbGltcHNlKCkNCiAgZmlsdGVyKA0KICAgIHAgPCAwLjAwMQ0KICApICU+JSANCiAgdCgpICU+JSANCiAgc3VtbWFyeSgpDQoNCnBhcmFtZXRyb3NfSVFBICU+JSANCiAgIyBncm91cF9ieShDT0RJR08pICU+JSANCiAgZHBseXI6OnNlbGVjdCgNCiAgICBuaXRyb19ramVsZGFobCwgQ29uZHV0aXZpZGFkZQ0KICApICU+JSANCiAgIyBjb3JyZWxhdGlvbjo6Y29yX3Rlc3QoKSAlPiUgDQogIHBsb3QoKQ0KDQpzdHIoDQogIHBsb3QoDQogICAgY29ycmVsYXRpb246OmNvcl90ZXN0KA0KICAgICAgcGFyYW1ldHJvc19JUUEsDQogICAgICAibml0cm9fa2plbGRhaGwiLA0KICAgICAgIkNvbmR1dGl2aWRhZGUiDQogICAgKQ0KICApDQopDQpgYGANCg0KIyMjIENvbmR1dGl2aWRhZGUgZWzDqXRyaWNhDQoNCmBgYHtyIEdyw6FmaWNvIGNvbmRfZWxldCBmYWNldHRlZCwgZmlnLmNhcD0iY29uZHV0aXZpZGFkZS1lbGV0cmljYS1ncmF2YXRhw60gbm8gcGVyw61vZG8gMTk5MC0yMDIwIiwgd2FybmluZyA9IEZBTFNFLCBtZXNzYWdlID0gRkFMU0V9DQooY29uZF9lbGV0IDwtIGdncGxvdChwbGFuX3dpZGVfMTk5MDIwMjAsDQogICAgICAgICAgICAgICAgICAgICAgICBhZXMoQ09ESUdPLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgIENvbmR1dGl2aWRhZGUpKSsNCiAgIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgIHhtaW49LUluZiwNCiAgICAgICAgICAgIHhtYXg9SW5mLA0KICAgICAgICAgICAgeW1pbj01MDAsDQogICAgICAgICAgICB5bWF4PUluZiwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjZWI1NjYxIikrICNjbGFzc2UgNA0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPS1JbmYsDQogICAgICAgICAgICB5bWF4PTUwMCwNCiAgICAgICAgICAgIGFscGhhPTEsDQogICAgICAgICAgICBmaWxsPSIjOGRjZGViIikrICNjbGFzc2UgMQ0KICAgc3RhdF9ib3hwbG90KGdlb20gPSAnZXJyb3JiYXInLA0KICAgICAgICAgICAgICAgIHdpZHRoPTAuMywNCiAgICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICAgZ2VvbV9ib3hwbG90KGZpbGw9JyNGOEY4RkYnLA0KICAgICAgICAgICAgICAgIGNvbG9yPSJibGFjayIsDQogICAgICAgICAgICAgICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICAgICAgICAgICAgICAgd2lkdGg9IDAuNykrDQogICBmYWNldF93cmFwKH5wZXJpb2RvKSsNCiAgICAgIGxhYnModGl0bGUgPSAiQ29uZHV0aXZpZGFkZSBlbMOpdHJpY2Egbm8gcGVyw61vZG8gMTk5MC0yMDIwIiwNCiAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgeT0iwrVtaG9zL2NtIikrDQogICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAuMDEsIDAuMDUpKSwNCiAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDgsDQogICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYygwLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbWF4KHBsYW5fd2lkZV8xOTkwMjAyMCRDb25kdXRpdmlkYWRlLCBuYS5ybSA9IFRSVUUpKSwNCiAgICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBzY2FsZXM6Om51bWJlcl9mb3JtYXQoYWNjdXJhY3kgPSAxLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZWNpbWFsLm1hcmsgPSAiLCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGJpZy5tYXJrID0gIiAiKSkrDQogICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgc2l6ZSA9IDEuMiwNCiAgICAgYWxwaGEgPSAuMjUsDQogICAgIHdpZHRoID0gLjA3LA0KICAgKSsNCiAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5ODAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDU1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gYygiUE0xIiwgIlBNMiIsICJQTTMiLCAiUE00IiwgIlBNNSIsICJQTTYiLCAiUE03IikNCiAgICkrDQogICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgICAgICAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSwNCiAgICAgICAgICAgICAgIHNpemUgPSAxKSsNCiAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBjb25kX2VsZXQgcGVyaW9kbzEsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKGNvbmRfZWxldF9wMSA8LSBnZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMDAiICYNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMTAiKSwNCiAgICAgICAgICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgQ29uZHV0aXZpZGFkZSkpKw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTUwMCwNCiAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNlYjU2NjEiKSsgI2NsYXNzZSA0DQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49LUluZiwNCiAgICAgICAgICAgIHltYXg9NTAwLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSkrDQogICBnZW9tX2JveHBsb3QoZmlsbD0nI0Y4RjhGRicsDQogICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICB3aWR0aD0gMC43KSsNCiAgICAgIGxhYnModGl0bGUgPSAiQ29uZHV0aXZpZGFkZSBlbMOpdHJpY2Egbm8gcGVyw61vZG8gMTk5MC0yMDAwIiwNCiAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgeT0iwrVtaG9zL2NtIikrDQogICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAuMDEsIDAuMDUpKSwNCiAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDgsDQogICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYygwLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbWF4KHBsYW5fd2lkZV8xOTkwMjAyMCRDb25kdXRpdmlkYWRlLCBuYS5ybSA9IFRSVUUpKSwNCiAgICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBzY2FsZXM6Om51bWJlcl9mb3JtYXQoYWNjdXJhY3kgPSAxLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZWNpbWFsLm1hcmsgPSAiLCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGJpZy5tYXJrID0gIiAiKSkrDQogICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgc2l6ZSA9IDEuMiwNCiAgICAgYWxwaGEgPSAuMjUsDQogICAgIHdpZHRoID0gLjA3LA0KICAgKSsNCiAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5ODAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDU1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gYygiUE0xIiwgIlBNMiIsICJQTTMiLCAiUE00IiwgIlBNNSIsICJQTTYiLCAiUE03IikNCiAgICkrDQogICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgICAgICAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSwNCiAgICAgICAgICAgICAgIHNpemUgPSAxKSsNCiAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBjb25kX2VsZXQgcGVyaW9kbzIsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKGNvbmRfZWxldF9wMiA8LSBnZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMDAiICYNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMTAiKSwNCiAgICAgICAgICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgQ29uZHV0aXZpZGFkZSkpKw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTUwMCwNCiAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNlYjU2NjEiKSsgI2NsYXNzZSA0DQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49LUluZiwNCiAgICAgICAgICAgIHltYXg9NTAwLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSkrDQogICBnZW9tX2JveHBsb3QoZmlsbD0nI0Y4RjhGRicsDQogICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICB3aWR0aD0gMC43KSsNCiAgIGxhYnModGl0bGUgPSAiQ29uZHV0aXZpZGFkZSBlbMOpdHJpY2Egbm8gcGVyw61vZG8gMjAwMC0yMDEwIiwNCiAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgeT0iwrVtaG9zL2NtIikrDQogICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAuMDEsIDAuMDUpKSwNCiAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDgsDQogICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYygwLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbWF4KHBsYW5fd2lkZV8xOTkwMjAyMCRDb25kdXRpdmlkYWRlLCBuYS5ybSA9IFRSVUUpKSwNCiAgICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBzY2FsZXM6Om51bWJlcl9mb3JtYXQoYWNjdXJhY3kgPSAxLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZWNpbWFsLm1hcmsgPSAiLCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGJpZy5tYXJrID0gIiAiKSkrDQogICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgc2l6ZSA9IDEuMiwNCiAgICAgYWxwaGEgPSAuMjUsDQogICAgIHdpZHRoID0gLjA3LA0KICAgKSsNCiAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5ODAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDU1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gYygiUE0xIiwgIlBNMiIsICJQTTMiLCAiUE00IiwgIlBNNSIsICJQTTYiLCAiUE03IikNCiAgICkrDQogICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgICAgICAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSwNCiAgICAgICAgICAgICAgIHNpemUgPSAxKSsNCiAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBjb25kX2VsZXQgcGVyaW9kbzMsIHdhcm5pbmcgPSBGQUxTRSwgbWVzc2FnZSA9IEZBTFNFfQ0KKGNvbmRfZWxldF9wMyA8LSBnZ3Bsb3QocGxhbl93aWRlXzE5OTAyMDIwICU+JSANCiAgICAgICAgICAgICAgICAgICAgICAgICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMTAiICYNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMjAiKSwNCiAgICAgICAgICAgICAgICAgICAgICAgIGFlcyhDT0RJR08sDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgQ29uZHV0aXZpZGFkZSkpKw0KICAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICAgeG1pbj0tSW5mLA0KICAgICAgICAgICAgeG1heD1JbmYsDQogICAgICAgICAgICB5bWluPTUwMCwNCiAgICAgICAgICAgIHltYXg9SW5mLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiNlYjU2NjEiKSsgI2NsYXNzZSA0DQogICBhbm5vdGF0ZSgicmVjdCIsDQogICAgICAgICAgICB4bWluPS1JbmYsDQogICAgICAgICAgICB4bWF4PUluZiwNCiAgICAgICAgICAgIHltaW49LUluZiwNCiAgICAgICAgICAgIHltYXg9NTAwLA0KICAgICAgICAgICAgYWxwaGE9MSwNCiAgICAgICAgICAgIGZpbGw9IiM4ZGNkZWIiKSsgI2NsYXNzZSAxDQogICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICAgd2lkdGg9MC4zLA0KICAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSkrDQogICBnZW9tX2JveHBsb3QoZmlsbD0nI0Y4RjhGRicsDQogICAgICAgICAgICAgICAgY29sb3I9ImJsYWNrIiwNCiAgICAgICAgICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICAgICAgICAgICB3aWR0aD0gMC43KSsNCiAgIGxhYnModGl0bGUgPSAiQ29uZHV0aXZpZGFkZSBlbMOpdHJpY2Egbm8gcGVyw61vZG8gMjAxMC0yMDIwIiwNCiAgICAgICAgeD0iRXN0YcOnw6NvIiwNCiAgICAgICAgeT0iwrVtaG9zL2NtIikrDQogICBzY2FsZV95X2NvbnRpbnVvdXMoZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAuMDEsIDAuMDUpKSwNCiAgICAgICAgICAgICAgICAgICAgICBuLmJyZWFrcyA9IDgsDQogICAgICAgICAgICAgICAgICAgICAgbGltaXRzID0gYygwLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbWF4KHBsYW5fd2lkZV8xOTkwMjAyMCRDb25kdXRpdmlkYWRlLCBuYS5ybSA9IFRSVUUpKSwNCiAgICAgICAgICAgICAgICAgICAgICBsYWJlbHMgPSBzY2FsZXM6Om51bWJlcl9mb3JtYXQoYWNjdXJhY3kgPSAxLA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICBkZWNpbWFsLm1hcmsgPSAiLCIsDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGJpZy5tYXJrID0gIiAiKSkrDQogICAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICAgc2l6ZSA9IDEuMiwNCiAgICAgYWxwaGEgPSAuMjUsDQogICAgIHdpZHRoID0gLjA3LA0KICAgKSsNCiAgIHNjYWxlX3hfZGlzY3JldGUobGltaXRzID0gYygiODczOTg1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5ODAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODczOTg5NTAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDU1MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDY5MDAiLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAiODc0MDk5MDAiKSwNCiAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gYygiUE0xIiwgIlBNMiIsICJQTTMiLCAiUE00IiwgIlBNNSIsICJQTTYiLCAiUE03IikNCiAgICkrDQogICBnZW9tX3Ntb290aChtZXRob2QgPSAibG0iLA0KICAgICAgICAgICAgICAgc2U9RkFMU0UsICNzZSBkZWl4YXIgVFJVRSBnZXJhIG8gaW50ZXJ2YWxvIGRlIGNvbmZpYW7Dp2EgZGUgOTUlDQogICAgICAgICAgICAgICBhZXMoZ3JvdXA9MSksDQogICAgICAgICAgICAgICBhbHBoYT0uNSwNCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSwNCiAgICAgICAgICAgICAgIHNpemUgPSAxKSsNCiAgIHRoZW1lX2dyYWZzKCkNCikNCmBgYA0KDQpgYGB7ciBHcsOhZmljbyBjb25kX2VsZXQgMyBwZXJpb2RvcyBqdW50b3MsIHdhcm5pbmc9RkFMU0UsIG1lc3NhZ2U9RkFMU0V9DQpncmlkLmFycmFuZ2UoY29uZF9lbGV0X3AxLCBjb25kX2VsZXRfcDIsIGNvbmRfZWxldF9wMywgbmNvbCA9IDMpDQpgYGANCg0KYGBge3IgU3Vtw6FyaW8gY29uZF9lbGV0LCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlID0gRkFMU0V9DQooc3VtX2NvbmRfZWxldF9wMSA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICBzZWxlY3QoQ09ESUdPLCBDb25kdXRpdmlkYWRlLCBBTk9fQ09MRVRBKSAlPiUgDQogICBmaWx0ZXIoQU5PX0NPTEVUQT4iMTk5MCIgJg0KICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMDAiKSAlPiUgDQogICBncm91cF9ieShDT0RJR08pICU+JSANCiAgIHN1bW1hcml6ZSgNCiAgICAgbWluID0gDQogICAgICAgbWluKENvbmR1dGl2aWRhZGUsIA0KICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICBxMSA9IA0KICAgICAgIHF1YW50aWxlKENvbmR1dGl2aWRhZGUsIDAuMjUsIA0KICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgIG1lZGlhbiA9IA0KICAgICAgIG1lZGlhbihDb25kdXRpdmlkYWRlLCANCiAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgbWVhbiA9IA0KICAgICAgIG1lYW4oQ29uZHV0aXZpZGFkZSwgDQogICAgICAgICAgICBuYS5ybT0gVFJVRSksDQogICAgIHEzID0gDQogICAgICAgcXVhbnRpbGUoQ29uZHV0aXZpZGFkZSwgMC43NSwgDQogICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgbWF4ID0gDQogICAgICAgbWF4KENvbmR1dGl2aWRhZGUsIA0KICAgICAgICAgICBuYS5ybSA9IFRSVUUpKQ0KKQ0KDQooc3VtX2NvbmRfZWxldF9wMiA8LSBwbGFuX3dpZGVfMTk5MDIwMjAgJT4lDQogICAgc2VsZWN0KENPRElHTywgQ29uZHV0aXZpZGFkZSwgQU5PX0NPTEVUQSkgJT4lIA0KICAgIGZpbHRlcihBTk9fQ09MRVRBPiIyMDAwIiAmDQogICAgICAgICAgICAgQU5PX0NPTEVUQTw9IjIwMTAiKSAlPiUgDQogICAgZ3JvdXBfYnkoQ09ESUdPKSAlPiUgDQogICAgc3VtbWFyaXplKA0KICAgICAgbWluID0gDQogICAgICAgIG1pbihDb25kdXRpdmlkYWRlLCANCiAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBxMSA9IA0KICAgICAgICBxdWFudGlsZShDb25kdXRpdmlkYWRlLCAwLjI1LCANCiAgICAgICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG1lZGlhbiA9IA0KICAgICAgICBtZWRpYW4oQ29uZHV0aXZpZGFkZSwgDQogICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWVhbiA9IA0KICAgICAgICBtZWFuKENvbmR1dGl2aWRhZGUsIA0KICAgICAgICAgICAgIG5hLnJtPSBUUlVFKSwNCiAgICAgIHEzID0gDQogICAgICAgIHF1YW50aWxlKENvbmR1dGl2aWRhZGUsIDAuNzUsIA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWF4ID0gDQogICAgICAgIG1heChDb25kdXRpdmlkYWRlLCANCiAgICAgICAgICAgIG5hLnJtID0gVFJVRSkpDQopDQoNCihzdW1fY29uZF9lbGV0X3AzIDwtIHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUNCiAgICBzZWxlY3QoQ09ESUdPLCBDb25kdXRpdmlkYWRlLCBBTk9fQ09MRVRBKSAlPiUgDQogICAgZmlsdGVyKEFOT19DT0xFVEE+IjIwMTAiICYNCiAgICAgICAgICAgICBBTk9fQ09MRVRBPD0iMjAyMCIpICU+JSANCiAgICBncm91cF9ieShDT0RJR08pICU+JSANCiAgICBzdW1tYXJpemUoDQogICAgICBtaW4gPSANCiAgICAgICAgbWluKENvbmR1dGl2aWRhZGUsIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIHExID0gDQogICAgICAgIHF1YW50aWxlKENvbmR1dGl2aWRhZGUsIDAuMjUsIA0KICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KICAgICAgbWVkaWFuID0gDQogICAgICAgIG1lZGlhbihDb25kdXRpdmlkYWRlLCANCiAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBtZWFuID0gDQogICAgICAgIG1lYW4oQ29uZHV0aXZpZGFkZSwgDQogICAgICAgICAgICAgbmEucm09IFRSVUUpLA0KICAgICAgcTMgPSANCiAgICAgICAgcXVhbnRpbGUoQ29uZHV0aXZpZGFkZSwgMC43NSwgDQogICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQogICAgICBtYXggPSANCiAgICAgICAgbWF4KENvbmR1dGl2aWRhZGUsIA0KICAgICAgICAgICAgbmEucm0gPSBUUlVFKSwNCiAgICAgIG4gPSANCiAgICAgICAgbGVuZ3RoKENvbmR1dGl2aWRhZGUpKQ0KKQ0KDQojIHBsYW5fd2lkZV8xOTkwMjAyMCAlPiUgDQojICAgIHNlbGVjdChDT0RJR08sIElRQSkgJT4lIA0KIyAgICBncm91cF9ieShDT0RJR08pICU+JSANCiMgICAgc3VtbWFyaXplKA0KIyAgICAgICBtaW4gPSANCiMgICAgICAgICAgbWluKElRQSwgDQojICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KIyAgICAgICBxMSA9IA0KIyAgICAgICAgICBxdWFudGlsZShJUUEsIDAuMjUsIA0KIyAgICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KIyAgICAgICBtZWRpYW4gPSANCiMgICAgICAgICAgbWVkaWFuKElRQSwgDQojICAgICAgICAgICAgICAgICBuYS5ybSA9IFRSVUUpLA0KIyAgICAgICBtZWFuID0gDQojICAgICAgICAgIG1lYW4oSVFBLCANCiMgICAgICAgICAgICAgICBuYS5ybT0gVFJVRSksDQojICAgICAgIHEzID0gDQojICAgICAgICAgIHF1YW50aWxlKElRQSwgMC43NSwgDQojICAgICAgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSksDQojICAgICAgIG1heCA9IA0KIyAgICAgICAgICBtYXgoSVFBLCANCiMgICAgICAgICAgICAgIG5hLnJtID0gVFJVRSkpDQpgYGANCg0KYGBge3IgU2FsdmFuZG8gY29uZF9lbGV0LCB3YXJuaW5nPUZBTFNFLCBtZXNzYWdlID0gRkFMU0V9DQpnZ3NhdmUoImNvbmRfZWxldC5wbmciLA0KICAgICAgIHVuaXRzID0gYygicHgiKSwNCiAgICAgICB3aWR0aCA9IDQ1MDAsDQogICAgICAgaGVpZ2h0ID0gMjk5MywNCiAgICAgICBwbG90ID0gY29uZF9lbGV0LA0KICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogICAgICAgZHBpID0gMzAwLA0KICAgICAgIHR5cGUgPSAiY2Fpcm8iKQ0KDQpnZ3NhdmUoImNvbmRfZWxldF9wMS5wbmciLA0KICAgICAgIHBsb3QgPSBjb25kX2VsZXRfcDEsDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmdnc2F2ZSgiY29uZF9lbGV0X3AyLnBuZyIsDQogICAgICAgcGxvdCA9IGNvbmRfZWxldF9wMiwNCiAgICAgICBwYXRoID0gIi4vZ3JhZmljb3MiLA0KICAgICAgIGRwaSA9IDMwMCwNCiAgICAgICB0eXBlID0gImNhaXJvIikNCg0KZ2dzYXZlKCJjb25kX2VsZXRfcDMucG5nIiwNCiAgICAgICBwbG90ID0gY29uZF9lbGV0X3AzLA0KICAgICAgIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogICAgICAgZHBpID0gMzAwLA0KICAgICAgIHR5cGUgPSAiY2Fpcm8iKQ0KDQpnZ3NhdmUoImNvbmRfZWxldF8zcGVyaW9kb3MucG5nIiwNCiAgICAgICB1bml0cyA9IGMoInB4IiksDQogICAgICAgd2lkdGggPSA0NTAwLA0KICAgICAgIGhlaWdodCA9IDI5OTMsDQogICAgICAgcGxvdCA9IGdyaWQuYXJyYW5nZShjb25kX2VsZXRfcDEsIGNvbmRfZWxldF9wMiwgY29uZF9lbGV0X3AzLCBuY29sID0gMyksDQogICAgICAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgICAgICBkcGkgPSAzMDAsDQogICAgICAgdHlwZSA9ICJjYWlybyIpDQoNCmBgYA0KDQojIyBUZXh0YW5kbyBvIHRleHRvDQoNCi0gICDCpyBmYWxhciBkbyBjb21wb3J0YW1lbnRvIGdlcmFsIGRvcyBkYWRvcw0KLSAgIDLCuiDCpyAtIHjCuiDCpyAtXD4gYWJvcmRhciBvcyBwcmluY2lwYWlzIHBhcsOibWV0cm9zIHF1ZSBlc3TDo28gc2VuZG8gaW1wYWN0YWRvcywgZGV0YWxoYW5kbywgbmFzIGVzdGHDp8O1ZXMgbWFpcyByZWxldmFudGVzLCBjb21vIGZpY2FyYW0gb3MgcXVhcnRpcy9tZWRpYW5hIGV0Yy4NCg0KYHIgc3VtX29kX3AxJFBNMVsxXWANCg0KT3MgcmVzdWx0YWRvcyBhcG9udGFtIHF1ZSBwYXJhIG8gcGFyw6JtZXRybyBPRA0KDQpgYGB7ciBlbGVtZW50b3MgZG8gYm94cGxvdH0NCihib3hwbG90X2V4YW1wbGUgPC0gZGF0YS5mcmFtZSgNCiAgUE0gPSBjKCJQTTEiKSwNCiAgIyBsZXRyYXMgPSBsZXR0ZXJzW3NlcSggZnJvbSA9IDEsIHRvID0gMSApXSwNCiAgU3RhdDEgPSBybm9ybSgxMDAsIA0KICAgICAgICAgICAgICAgIG1lYW49NSwgDQogICAgICAgICAgICAgICAgc2Q9MykNCikgJT4lIA0KICBnZ3Bsb3QoDQogICAgYWVzKA0KICAgICAgeCA9IFBNLA0KICAgICAgeSA9IFN0YXQxLA0KICAgICkNCiAgKSsNCiAgYW5ub3RhdGUoInJlY3QiLA0KICAgICAgICAgICB4bWluID0gLUluZiwgeG1heCA9IEluZiwNCiAgICAgICAgICAgeW1pbiA9IC1JbmYsIHltYXggPSAyLA0KICAgICAgICAgICBhbHBoYSA9IDEsDQogICAgICAgICAgIGZpbGwgPSAiI2FjNTA3OSIpKyAjPnBpb3IgY2xhc3NlDQogIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgeG1pbiA9IC1JbmYsIHhtYXggPSBJbmYsDQogICAgICAgICAgIHltaW4gPSAyLCB5bWF4ID0gNCwNCiAgICAgICAgICAgYWxwaGEgPSAxLA0KICAgICAgICAgICBmaWxsID0gIiNlYjU2NjEiKSsgI2NsYXNzZSA0DQogIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgeG1pbiA9IC1JbmYsIHhtYXggPSBJbmYsDQogICAgICAgICAgIHltaW4gPSA0LCB5bWF4ID0gNSwNCiAgICAgICAgICAgYWxwaGEgPSAxLA0KICAgICAgICAgICBmaWxsID0gIiNmY2Y3YWIiKSsgI2NsYXNzZSAzDQogIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgeG1pbiA9IC1JbmYsIHhtYXggPSBJbmYsDQogICAgICAgICAgIHltaW4gPSA1LCB5bWF4ID0gNiwNCiAgICAgICAgICAgYWxwaGEgPSAxLA0KICAgICAgICAgICBmaWxsID0gIiM3MGMxOGMiKSsgI2NsYXNzZSAyDQogIGFubm90YXRlKCJyZWN0IiwNCiAgICAgICAgICAgeG1pbiA9IC1JbmYsIHhtYXggPSBJbmYsDQogICAgICAgICAgIHltaW49IDYsIHltYXggPSBJbmYsDQogICAgICAgICAgIGFscGhhID0gMSwNCiAgICAgICAgICAgZmlsbCA9ICIjOGRjZGViIikrICNjbGFzc2UgMQ0KICBzdGF0X3N1bW1hcnkoDQogICAgZnVuLmRhdGEgPSBmLA0KICAgIGdlb20gPSAnZXJyb3JiYXInLA0KICAgIHdpZHRoID0gMC4xNSwNCiAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSksDQogICkrDQogIHN0YXRfc3VtbWFyeSgNCiAgICBmdW4uZGF0YSA9IGYsDQogICAgZ2VvbSA9ICJib3hwbG90IiwNCiAgICB3aWR0aCA9IDAuNDAsDQogICAgZmlsbCA9ICcjRjhGOEZGJywNCiAgICBjb2xvciA9ICJibGFjayIsDQogICAgb3V0bGllci5zaGFwZSA9IE5BLCAjc2UgZGVpeGFyIE5BIGZpY2Egc8OzIG8gaml0dGVyLCBzZSBuw6NvLCBkZWl4YSAxDQogICkrDQpsYWJzKA0KICB0aXRsZSA9ICJFbGVtZW50b3MgZG8gKmJveHBsb3QqIiwNCiAgeD0gTlVMTCwNCiAgeT0gTlVMTA0KKSsNCiAgZ2diZWVzd2FybTo6Z2VvbV9xdWFzaXJhbmRvbSgNCiAgICBzaXplID0gMS4yLA0KICAgIGFscGhhID0gLjI1LA0KICAgIHdpZHRoID0gLjA3LA0KICApKw0KICBzY2FsZV95X2NvbnRpbnVvdXMoDQogICAgZXhwYW5kID0gZXhwYW5zaW9uKG11bHQgPSBjKDAsMCkpLA0KICAgIG4uYnJlYWtzID0gOCwNCiAgICBsaW1pdHMgPSBjKC0wLjMsMTQpDQogICkrDQp0aGVtZV9ncmFmcygpKw0KICB0aGVtZSgNCiAgICBwbG90LnRpdGxlID0gDQogICAgICBlbGVtZW50X21hcmtkb3duKA0KICAgICAgICBoanVzdCA9IDAuNSwNCiAgICAgICAgY29sb3IgPSAiYmxhY2siLA0KICAgICAgICBzaXplID0gMTkpLA0KICApDQopDQpgYGANCg0KYGBge3IgY3JpYW5kbyBleGVtcGxvIHRpcG9zIGJveHBsb3QgdHVrZXkgeCBnYXJyZXR0fQ0Kc2V0LnNlZWQoMjAyMSkNCg0KZGF0YSA8LSB0aWJibGUoDQogIGdydXBvID0gZmFjdG9yKA0KICAgIGMocmVwKA0KICAgICAgIkdydXBvIDEiLCAxMDApLCANCiAgICAgIHJlcCgiR3J1cG8gMiIsIDI1MCksIA0KICAgICAgcmVwKCJHcnVwbyAzIiwgMjUpDQogICAgKQ0KICApLA0KICB2YWxvciA9IGMoc2VxKDAsIDIwLCBsZW5ndGgub3V0ID0gMTAwKSwNCiAgICAgICAgICAgIGMocmVwKDAsIDUpLCANCiAgICAgICAgICAgICAgcm5vcm0oMzAsIDIsIC4xKSwgDQogICAgICAgICAgICAgIHJub3JtKDkwLCA1LjQsIC4xKSwgDQogICAgICAgICAgICAgIHJub3JtKDkwLCAxNC42LCAuMSksIA0KICAgICAgICAgICAgICBybm9ybSgzMCwgMTgsIC4xKSwgDQogICAgICAgICAgICAgIHJlcCgyMCwgNSkNCiAgICAgICAgICAgICksDQogICAgICAgICAgICByZXAoc2VxKDAsIDIwLCBsZW5ndGgub3V0ID0gNSksIDUpKQ0KKSAlPiUgDQogIHJvd3dpc2UoKSAlPiUNCiAgbXV0YXRlKA0KICAgIHZhbG9yID0gaWZfZWxzZSgNCiAgICAgIGdydXBvID09ICJHcnVwbyAyIiwgdmFsb3IgKyBybm9ybSgxLCAwLCAuNCksIA0KICAgICAgdmFsb3INCiAgICAgICkNCiAgICApDQoNCiMjIGZ1bmN0aW9uIHRvIHJldHVybiBtZWRpYW4gYW5kIGxhYmVscw0Kbl9mdW4gPC0gZnVuY3Rpb24oeCl7DQogIHJldHVybigNCiAgICBkYXRhLmZyYW1lKA0KICAgICAgeSA9IG1lZGlhbih4KSAtIDEuMjUsIA0KICAgICAgbGFiZWwgPSBwYXN0ZTAoDQogICAgICAgICJuID0gIixsZW5ndGgoeCkNCiAgICAgICkNCiAgICApDQogICkNCn0NCmBgYA0KDQpgYGB7ciB0dWtleSBib3hwbG90fQ0KKHR1a2V5X25fYm94cGxvdCA8LSBnZ3Bsb3QoZGF0YSwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICBhZXMoeCA9IGdydXBvLCANCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICB5ID0gdmFsb3IpDQopKw0KICBzdGF0X2JveHBsb3QoZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgICAgICAgICB3aWR0aCA9IDAuMTUsDQogICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpKw0KICBnZW9tX2JveHBsb3QoZmlsbCA9ICJncmV5OTIiLA0KICAgICAgICAgICAgICAgd2lkdGggPSAwLjQwLA0KICAgICAgICAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuNjUpKSsNCiAgIyMgdXNlIHN1bW1hcnkgZnVuY3Rpb24gdG8gYWRkIHRleHQgbGFiZWxzDQogIHN0YXRfc3VtbWFyeSgNCiAgICBnZW9tID0gInRleHQiLA0KICAgIGZ1bi5kYXRhID0gbl9mdW4sDQogICAgZmFtaWx5ID0gIk9zd2FsZCIsDQogICAgc2l6ZSA9IDUNCiAgKSsNCiAgbGFicygNCiAgICB0aXRsZSA9ICJUdWtleSAqYm94cGxvdCoiLA0KICAgIHg9IE5VTEwsDQogICAgIyB5PSJtZy9MIg0KICApKw0KICAjIHRoZW1lX2dyYWZzKCkrDQogIHRoZW1lX2J3KCkrDQogIHRoZW1lKA0KICAgIGF4aXMudGV4dC55ID0gZWxlbWVudF90ZXh0KA0KICAgICAgYW5nbGUgPSA5MCwgDQogICAgICAjIHNpemU9MTUsDQogICAgICAjIGZhY2U9Mg0KICAgICksDQogICAgcGxvdC50aXRsZSA9IA0KICAgICAgZWxlbWVudF9tYXJrZG93bigNCiAgICAgICAgaGp1c3QgPSAwLjUsDQogICAgICAgIGNvbG9yID0gImJsYWNrIiwNCiAgICAgICAgc2l6ZSA9IDE5KQ0KICApDQopDQoNCg0KKHR1a2V5X2JveHBsb3QgPC0gZ2dwbG90KGRhdGEsIGFlcyh4ID0gZ3J1cG8sIA0KICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICB5ID0gdmFsb3IpKSArDQogIHN0YXRfYm94cGxvdChnZW9tID0gJ2Vycm9yYmFyJywNCiAgICAgICAgICAgICAgIHdpZHRoID0gMC4xNSwNCiAgICAgICAgICAgICAgIHBvc2l0aW9uID0gcG9zaXRpb25fZG9kZ2Uod2lkdGggPSAwLjY1KSkrDQogIGdlb21fYm94cGxvdChmaWxsID0gImdyZXk5MiIsDQogICAgICAgICAgICAgICB3aWR0aCA9IDAuNDAsDQogICAgICAgICAgICAgICBwb3NpdGlvbiA9IHBvc2l0aW9uX2RvZGdlKHdpZHRoID0gMC42NSkpICsNCiAgIyMgdXNlIGVpdGhlciBnZW9tX3BvaW50KCkgb3IgZ2VvbV9qaXR0ZXIoKQ0KICBnZW9tX3BvaW50KA0KICAgICMjIGRyYXcgYmlnZ2VyIHBvaW50cw0KICAgIHNpemUgPSAyLA0KICAgICMjIGFkZCBzb21lIHRyYW5zcGFyZW5jeQ0KICAgIGFscGhhID0gLjI1LA0KICAgICMjIGFkZCBzb21lIGppdHRlcmluZw0KICAgIHBvc2l0aW9uID0gcG9zaXRpb25faml0dGVyKA0KICAgICAgIyMgY29udHJvbCByYW5kb21uZXNzIGFuZCByYW5nZSBvZiBqaXR0ZXINCiAgICAgIHNlZWQgPSAxLCB3aWR0aCA9IC4yDQogICAgKQ0KICApKw0KICB0aGVtZV9idygpKw0KICBsYWJzKA0KICAgICAgdGl0bGUgPSAiVHVrZXkgKmJveHBsb3QqIiwNCiAgICAgIHg9IE5VTEwsDQogICAgICAjIHk9Im1nL0wiDQogICAgKSsNCiAgIyB0aGVtZV9ncmFmcygpKw0KICB0aGVtZV9idygpKw0KICB0aGVtZSgNCiAgICAgICAgYXhpcy50ZXh0LnkgPSBlbGVtZW50X3RleHQoDQogICAgICAgICAgYW5nbGUgPSA5MCwgDQogICAgICAgICAgIyBzaXplPTE1LA0KICAgICAgICAgICMgZmFjZT0yDQogICAgICAgICksDQogICAgICAgIHBsb3QudGl0bGUgPSANCiAgICAgICAgICBlbGVtZW50X21hcmtkb3duKA0KICAgICAgICAgICAgaGp1c3QgPSAwLjUsDQogICAgICAgICAgICBjb2xvciA9ICJibGFjayIsDQogICAgICAgICAgICBzaXplID0gMTkpDQogICAgKSkNCmBgYA0KDQpgYGB7ciBnYXJyZXR0IGJveHBsb3R9DQpkYXRhICU+JSANCiAgZ3JvdXBfYnkoZ3J1cG8pICU+JSANCiAgc3VtbWFyaXplKA0KICAgIG1pbiA9IG1pbih2YWxvciksDQogICAgUDIwID0gcXVhbnRpbGUodmFsb3IsIDAuMjApLA0KICAgIHExID0gcXVhbnRpbGUodmFsb3IsIDAuMjUpLA0KICAgIG1lZGlhbmEgPSBtZWRpYW4odmFsb3IpLA0KICAgIHEzID0gcXVhbnRpbGUodmFsb3IsIDAuNzUpLA0KICAgIFA4MCA9IHF1YW50aWxlKHZhbG9yLCAwLjgwKSwNCiAgICBtYXggPSBtYXgodmFsb3IpDQogICkgJT4lIA0KICB0KCkgJT4lIA0KICByb3dfdG9fbmFtZXMocm93X251bWJlciA9IDEpDQogIA0KICANCihib3hfcGVyY2VudGlsZV9wbG90IDwtIGdncGxvdChkYXRhLCANCiAgICAgICBhZXMoeCA9IGdydXBvLCB5ID0gdmFsb3IpDQogICAgICAgKSArDQogICAgICBzdGF0X3N1bW1hcnkoDQogICAgICAgIGZ1bi5kYXRhID0gZiwNCiAgICAgICAgZ2VvbSA9ICdlcnJvcmJhcicsDQogICAgICAgIHdpZHRoID0gMC4xNSwNCiAgICAgICAgcG9zaXRpb24gPSBwb3NpdGlvbl9kb2RnZSh3aWR0aCA9IDAuNjUpLA0KICAgICAgKSsNCiAgICAgIHN0YXRfc3VtbWFyeSgNCiAgICAgICAgZnVuLmRhdGEgPSBmLA0KICAgICAgICBnZW9tID0gImJveHBsb3QiLA0KICAgICAgICB3aWR0aCA9IDAuNDAsDQogICAgICAgIGZpbGwgPSAnZ3JleTkyJywNCiAgICAgICAgY29sb3IgPSAiYmxhY2siLA0KICAgICAgICBvdXRsaWVyLnNoYXBlID0gTkEsICNzZSBkZWl4YXIgTkEgZmljYSBzw7MgbyBqaXR0ZXIsIHNlIG7Do28sIGRlaXhhIDENCiAgICAgICkrDQogICMgZ2VvbV9ib3hwbG90KGZpbGwgPSAiZ3JleTkyIikgKw0KICAjIyB1c2UgZWl0aGVyIGdlb21fcG9pbnQoKSBvciBnZW9tX2ppdHRlcigpDQogIGdlb21fcG9pbnQoDQogICAgIyMgZHJhdyBiaWdnZXIgcG9pbnRzDQogICAgc2l6ZSA9IDIsDQogICAgIyMgYWRkIHNvbWUgdHJhbnNwYXJlbmN5DQogICAgYWxwaGEgPSAuMjUsDQogICAgIyMgYWRkIHNvbWUgaml0dGVyaW5nDQogICAgcG9zaXRpb24gPSBwb3NpdGlvbl9qaXR0ZXIoDQogICAgICAjIyBjb250cm9sIHJhbmRvbW5lc3MgYW5kIHJhbmdlIG9mIGppdHRlcg0KICAgICAgc2VlZCA9IDEsIHdpZHRoID0gLjINCiAgICApDQogICkrDQogIGxhYnMoDQogICAgICB0aXRsZSA9ICIqQm94IFBlcmNlbnRpbGUtUGxvdCoiLA0KICAgICAgeD0gTlVMTCwNCiAgICAgICMgeT0ibWcvTCINCiAgICApKw0KICAjIHRoZW1lX2dyYWZzKCkrDQogIHRoZW1lX2J3KCkrDQogIHRoZW1lKA0KICAgICAgICBheGlzLnRleHQueSA9IGVsZW1lbnRfdGV4dCgNCiAgICAgICAgICBhbmdsZSA9IDkwLCANCiAgICAgICAgICAjIHNpemUgPSAxNSwNCiAgICAgICAgICAjIGZhY2UgPSAyDQogICAgICAgICksDQogICAgICAgIHBsb3QudGl0bGUgPSANCiAgICAgICAgICBlbGVtZW50X21hcmtkb3duKA0KICAgICAgICAgICAgaGp1c3QgPSAwLjUsDQogICAgICAgICAgICBjb2xvciA9ICJibGFjayIsDQogICAgICAgICAgICBzaXplID0gMTkpDQogICAgKQ0KICApDQpncmlkLmFycmFuZ2UoDQogIHR1a2V5X2JveHBsb3QsIGJveF9wZXJjZW50aWxlX3Bsb3QsIA0KICBuY29sID0gMg0KICApDQpmaWdfdHVrZXlfZ2FycmV0dCA8LSBwbG90X2dyaWQodHVrZXlfYm94cGxvdCwgYm94X3BlcmNlbnRpbGVfcGxvdCwgDQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgbGFiZWxzID0gIkFVVE8iKQ0KYGBgDQoNCg0KYGBge3Igc2FsdmFuZG8gZ3JhZiBleGVtcGxvIGJveHBsb3R9DQpnZ3NhdmUoDQogIGZpbGVuYW1lID0gInR1a2V5X25fYm94cGxvdC5wbmciLA0KICBwbG90ID0gdHVrZXlfbl9ib3hwbG90LA0KICB1bml0cyA9IGMoInB4IiksDQogIHdpZHRoID0gNDUwMCwNCiAgaGVpZ2h0ID0gMjk5MywNCiAgcGF0aCA9ICIuL2dyYWZpY29zIiwNCiAgZHBpID0gMzAwLA0KICAjIHR5cGUgPSAiY2Fpcm8iDQopDQoNCmdnc2F2ZSgNCiAgZmlsZW5hbWUgPSAidHVrZXlfYm94cGxvdC5wbmciLA0KICBwbG90ID0gdHVrZXlfYm94cGxvdCwNCiAgdW5pdHMgPSBjKCJweCIpLA0KICB3aWR0aCA9IDQ1MDAsDQogIGhlaWdodCA9IDI5OTMsDQogIHBhdGggPSAiLi9ncmFmaWNvcyIsDQogIGRwaSA9IDMwMCwNCiAgIyB0eXBlID0gImNhaXJvIg0KKQ0KDQpnZ3NhdmUoDQogIGZpbGVuYW1lID0gImJveF9wZXJjZW50aWxlX3Bsb3QucG5nIiwNCiAgcGxvdCA9IGJveF9wZXJjZW50aWxlX3Bsb3QsDQogIHVuaXRzID0gYygicHgiKSwNCiAgd2lkdGggPSA0NTAwLA0KICBoZWlnaHQgPSAyOTkzLA0KICBwYXRoID0gIi4vZ3JhZmljb3MiLA0KICBkcGkgPSAzMDAsDQogICMgdHlwZSA9ICJjYWlybyINCikNCg0KZ2dzYXZlKA0KICBmaWxlbmFtZSA9ICJmaWdfdHVrZXlfZ2FycmV0dC5wbmciLA0KICBwbG90ID0gZmlnX3R1a2V5X2dhcnJldHQsDQogIHVuaXRzID0gYygicHgiKSwNCiAgd2lkdGggPSA0NTAwLA0KICBoZWlnaHQgPSAyOTkzLA0KICBwYXRoID0gIi4vZ3JhZmljb3MiLA0KICBkcGkgPSAzMDAsDQogICMgdHlwZSA9ICJjYWlybyINCikNCmBgYA0KDQo=